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ABSTRACT 


THE FUNCTION OF THE OMC11 DIJAGNOSTT 
OPTION OPERATES oak TO SPECI 
NERE AY THAT THERE po Me MALFUNCTIO 

THE OMC11 ARE CORRECT IN I o ENV 
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To VERIFY THAT THE 
TIONS. THE OIAGNOSTICS 
eng re ALL OPERSTIONS 





PARAMETERS MUST BE SET UP TO ALERT THE O 
DMC11 CONFIGURATION. THESE PARAMETERS 2 
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STATUS TABLE AND ARE GENERATED IN T 
INPUT - T OPERATOR ANSWERS QUESTIONS. 
PROGRAM DETERMINES fue PARAMETERS AUTOMATT: 


COME T STS THE gree bh, tilt UNIT (M8201 wr, a 

FORM gh 9 ty N THE DMC LINE UNIT R 

CkS FOR PROPE Met RECEIVER, AND SCC 
, SIGNALS ARE’ 
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es oR (MB200 204) . POR 
NOSIS A TURN-ARCUND CONNECTOR SHOULD 5E INSTALLED 


SURETY THERE ARE FOI a OFF LINE DIAGNOSTICS THAT ARE TO GE 
PUN SEQUENCE TQ SURE THRT IF AN ERROR SHOULD OCCUR IT 
WILL es DETECTED AT AN gaLy STAGE. 


NOTE: ADDITIONAL DIAGNOSTICS MAY BE ADDED IN THE FUTURE. 
THE FOUR DIAGNOSTICS ARE: 
DedMC ey BASIC W/R_AND MICRO-PRO 
esers REV] 


i 
g. BDCME PINE UNIT TESTS 
7: O2OMF [REV] BITSTUFF LINE UNIT TESTS 
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+ be at 3 SUI OOP oP OP Oar Carrara 
“jo 


AH COCOCD CD CD COCOCI CDC = 3) 
C00 JOP Ue Cotte 0.0 


C 
O20M3 [REV] JUMP AND FREE-RUNNING TESTS (HEAT TEST TAPE 
REQUIREMENTS 
1 EQUIPMENT 
BNy EDPLL FAMILY CPU (EXCEPT AN LSI-11) MITH MINIMUM 8k MENA) 
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DMC 12-0A OR OMC1I-MO OR OMC11I-Ma 
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2.2 STORAGE 
PROGRAM WILL USE ALL 8K OF MEMORY EXCE®T WHERE ABL AND 
BOOTSTRAP LOADER RESIDE. LOCATIONS 1500 THRU 1649; cONTAIN 

U =CALL 
(AUTO-SIZING). THIS AREA IS AN OVERLAY AREA AND SHOULD NOT SE 
ALTERED BY THE OPERATOR. 


LOADING PROCEEDURE 


i METHOD 
ALL PROGRAMS ARE IN ORSOL UTE pon Noct ARE LOADED USING THE 
ABSOLUTE LOADER. NOTE: on, DIAG hes ARE ON A MEDIA SUCH 
AS DISK_,MAGTAPE of taée CaS ety FOLLOW _INST Tae Toe 
P 109 §. PS 


FOR THE’ MONITOR WHICH OAs BEEN Bh oy rpee ON THAT $ 


ABSOLUTE LOADER STARTING ADDRESS #500 
MEMORY # SIZE 


4K 17 
SK 37 
12k o? 
LK 77 
20k 117 
c4kK 13? 
28k 157 





3.1.1 PLACE ROORE SS OF ABS LOROER inte SHITE H REGISTER. 
ALSO PLACE ‘HALT’ SW 


3.1.2 DEPRESS "LORD ADORESS* KEY ON CONSOLE AND RELEASE. 


3.1.3 DEPRESS *START ¥ ™ CONSOLE AND RELEASE 
SE LORDING INTO C oF U) 
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4, STARTING PROCEEDURE 
i A. SET ne REGISTER TO 000200 
: B. O€ Pre « OBR cm + KEY AND RELEASE 
¢. SET SWR FOR "AUTO SIZING’ OR SWR BITO=1 FOR MANUAL 


£ Ah A UIGLIGIGIGS 
Gatue-+O. 000-1 


70°08) 


Bet guest] NS) OR SiR 8 TEL TQ U aioe Rn Berti 
UMC) 


on st P fF REVIOUS STAR 
a7 
148 D. DEPRESe ‘START KEY’ AND RELEASE, THE PROGRAM WILL TYPE 
iy? MAINDEC NAME AND PROGRAM NAME (IF THIS WAS THE FIRST START 
38 UP OF THE PROGRAM) AND ALSO THE FOLLOWING: 
is MAP OF DMCLL STATUS 
L + ee eee ee Pee ee eee eee ee, eee oe) ee ee eae 
is 
183 PC CSR STATI STAT2 STATS 
iss 
156 001500 180010 145310 177777 oo0000 
167 001510 160020 145320 177777 Sooddo 
i5$ THE PROGRAM WILL TYPE ’R’ AND PROCEED TO RUN THE DIAGNOSTIC. 
169 THE ABOVE IS ONLY AN EXAMPLE. THIS WOULD INDICATE THE STATUS 
16: TABLE STARTING AT A 1500 IN THE PROGRAM. IN THIS EXAMPLE 
163 THE TABLE CONTAINS THE INFORMATION AND STATUS OF TWO OMCL! 
ié3 THE STATUS TABLE MU VERIFIED By THE USER IF AUTO SIZING 

| IES Is BONE. FOR INFORMATION OF STATUS TABLE SEE SECTION 8-4 £08 

Paes, IF THE DIAGNOSTIC URS STARTED WITH SUOQ=1 INDICATING. MANUA 

ge PARAMETER INPUT THEN THE FOLLOWING SHOWS AN EXAMPLE OF T 

i§$ QUESTIONS ASKED AND SOME EXAMPLE ANSWERS: 

| 171 HOW MANY DMC11'S TO BE TESTED?! 

| Ts 01 

| 7% €5R ADDRESS? 160010 

| 325 VECTOR ROORESS* 19 

WR BR PRIORIT vee? 

ow DOES MIC BpRSCE SOR ‘Have® aban? CY OR NIN 

| 178 WHICH LINE UNIT? IF NONE TYPE “N*, IF Ma201 TPE “1", IF 

| {79 meoo2 TYPE "2"?] 

| e868 1§ THE LOOP BACK CONNECTOR ON?Y 

| ei SNITCH PACB1 (DOCMP LINES) ?377 

| 82 SWITCH PAC (BMS73 BOOT ADD) 7377 

| 164 FOLLOWING THE QUESTIONS THE status nee is PRINTED OUT AS 
fg Saito HE wetting PPh Thatta ue fais urs 
oe if a) 
157 Sus =0 AND HE Sst 3 (AUTO- 121 Ne are NO Sane aR ASKED 
AS: ONLY tHe STATUS-MAP IS PRI RUTO-SIZING IS 
188 Heep THE STATUS INFORMATION EO ST Ob VERIFIED TO BE CORRECT 
156 (MATCH THE HARDWARE). IF IT DOES NOT MATCH THE HARDWARE THE 
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DIAGNOSTIC MUST BE RESTARTED WITH SWOO=1 AND THE QUESTIONS 
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CONTROL SWITCH SETTINGS 
SW 15 apt: A Hit gn DEANE NT 





SW 14 SET: T TEST 
SW 13 SET: THIET? ERROR PRINT OUT 
SW le eet: INH eit Tyee QUT/ABELL ON ERROR. 
SW11 SET: INHIBIT ITERATIONS. (QUICK PASS) 
SW 10 SET: ESCAPE TO NEXT TEST ON ERROR 
SW 09 SET: LOOP WITH ate 
SW O08 SET: CATCH ERROR AND LOOP ON IT 
SW O7 SET: USE PREVIOUS STATUS TABLE. 5 
SW O06 SET: HALT IN ROMCLK ROUTINE BEFORE CLOCKING 
MICRO-PROCESSOR 
SW OS SET: RESERVED 
Q4 SET: 


SW : RESERVED 
SW O03 SET: weg ¥ DMC11°S Peapnen ACTIVE 


: SELECT 
SW Ql SET: RESTART PROGRAM A T SELECTED TEST 
SK OO SET: BUILD NEW ST ATU TABLE FROM QUESTIONS. (IF SWQ7=0 
AND SWOO=0 NEW STATUS TABLE IS BUILT BY 
AUTO-SIZING) 


SWITCH_OS AND 08-15 ARE DYNAMIC AND CAN SE CHANGED AS NEEDED . 
WHILE THE DIAGNOSTIC IS RUNNING. SWITCHES 00-03 AND SHITCH o? 
ae stat ike ANC ARE USED ONLY ON STARTING OR RESTARTING THE 
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DZOMER. P11 
z22 
ze 
es 4.1.2 SWITCH REGISTER OPTIONS (AT START UP) 
ee? SW O1 RESTART PROGRAM AT SELECTED TEST. IT IS STRONGLY 
228 SUGGESTED THAT AT LEAST ONE PASS HAS aan MODE eros 
229 TRYING TO SELECT A TEST, THE REASON BEING IS THAT THE 
230 PROGRAM HAS TO CLEAR’ AREAS AND SET UP PARAMETERS. 
é3l WHEN THIS salt IS USED THE DIAGNOSTIC WILL ASK TEST 
232 NO.? AN Y TYPING THE NUMBER OF THE TEST DESIRED 
533 ANS caRRIGE Be FURN TO BEGIN EXECUTION AT THE SELECTED 
23 
236 SW O02 LOCK ON SELECTED TEST. THIS SWITCH WHEN USED a 
Ky SWOl WILL CAUSE THE PROGRAM TO CONSTANTLY LOOP ON THE 
238 SELECTED TEST. HITTI NY KEY T SOLE WILL 
23s IT ADVANCE TO THE NEXT TEST AND LOOP UNTIL A K 
240 IS HIT AGAIN. IF SWOe=0 WHEN SWOl IS USED. THE 
e41 PROGRAM WILL BEGIN AT THE SELECTED TEST AND CONTINUE 
sis NORMAL ORERRPIONS. 
5y rs 
244 SW O03 RESELECT DMC11°S DESIRED ACTIVE. PLEASE NOTE THAT A 
245 MESSAGE IS TYPED OUT FOR SETTING THE SWITCH REGISTER 
e46 EQUAL TO DMC11°S ACTIVE. THIS MEANS IF THE SYSTEM HAS 
ay F BITS 00,01,02,03 WILL SE SET IN LOC 
248 MAaCTV’ FROM T SWITCH STER. USING THIS 
243 ee a ALTERS THAT LOCATION: THEREFORE IF FOUR 
250 OMC11S ARE IN THE SYSTEM x***#D0 NOfx** SET SWITCHS 
esl GREATER THAN SW 03 IN THE UP POSITION. THIS WOULD BE 
ese A FATAL ERROR. DO NOT SELECT MORE ACTIVE DMC11S THAN 
£35 THERE IS INFORMATION ON IN THE STATUS TABLE. 
@S5 METHOD: A: LOAD ADDRESS 200 
sé 8: START WITH SW O0=1 
257 C: og WILL TYPE MESSAGE 
2S8 D: SET A SWITCH FOR wate't OMC DESIRED ACTIVE. 
253 EXAMPLE: IF YOU HAVE 4 DMC*S BUT ONLY WANT TO 
£60 RUN THe FIRST AND Tie LAST SET SWR BITS 0 AND 
2bi 33 PRESS CONTIN 
ete E: NUMBER (IF VALID) HELL BE IN DATA LIGHTS 
cb3 (EXCLUDING 11/05) 
264 SET WITH. ANY OTHER SWITCH SETTINGS DESIRED. 
cst PRESS CONTINUE. 
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DYNAMIC SWITCHES 
ERROR SWITCHES 


l SW le DELETE PRINT Or. ON ERROR. 

e. SW 13 DELETE ERROR PRINT 

3. SW 1S HALT ON 1s ERR he 

3. SW 08 GOTO BEGINNING OF THE TEST(ON ERROR). 
S SW 10 GOTO NEXT TEST(ON ERROR). 


SCOPE SWITCHES 


1. SWOS HALT _IN  ROMCLK ROUTINE BEF ORE CLOCKING 
MICRO-PROCESSOR INSTRUCTION. THIS ALLOWS THE 
ere TQ Bi A Tee re INSTRUCTION IN 

THE me BEF ORE IS CLOCKED. HIT 


C RUNNING. 
é. SWO9 (TF ENABLED BY rSEOP IS) ) ON _AN ERROR; IF AN *#’ IS 
aed IN FRONT OF THE TEST NO. Lex. ty po 
0 SWOS_ IS INCORPORATED He gest 


S ‘BEST. =0, 
FOR INTERAITTERT eet, SwWi4=i 
WILL =O, sh ON TEST REGUARDLESS OF ERROR’ OR NOT 
ERROR. (SW14=1, SW1O=0, SWO9=0, SWOS=1,0) 
3. SW11 | INHIBIT INTERATIONS. 
4° Swi4 LOOP ON CURRENT TEST. 


STARTING ADDRESS 


STARTING ADORESS IS AT 000200 THERE ARE NO OTHER Mail ae 
RDDRESSES FOR THE DMC11 DIAGNOSTICS. (SEE SECTION 4.2) 
T 


NOTE: IF ADDRESS 000042 IS pe ae THE PROGRAM tT I 
IS UNDER ACT11 OR CONTROL D AM 


ARCORDINGL Y RAFTER ALL AyaILABLE. ay “3 shes TESTED THE 
PROGRAM WILL RETURN TO *XXDP’ 


OPERATING PROCEDURE 
WHEN PROGRAM IS INITIALLY STARTED MESSAGES AS DESCRIBED IN 


SECTION 4.Q WILL GE PRINTED, AND PROGRAM WILL BEGIN RUNNING 
THE DIAGNOSTIC 
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ALSO 
“THE pie PRINTED ON THE Fy 73 
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PROGRPM AND/OR OPERATOR ACTION 
THE TYPICAL APPROACH SHOULD BE 


. HALT_ON ERROR (VIA SW 15=1) WHEN EVER AN ERROR OCCURS. 
¢: CLEAR SW 15S. 

. SET SW 14: (LOOP ON THIS TEST) 
4. SET SW 13: (INHIBIT ERROR PRINT OUT) 


THE TEST NUMBER AND PC WILL BE TYPED OUT AND POSSIBILY AN 
en MESSAGE (THIS DEPENDS ON THE TEST) TO GIVE THE OPERATOR 

N IDEA AS TO THE SOURCE OF THE PROBLEM. IF IT IS NECESSARY 
Tok KNOW MORE INFORMATION CONCERNING THE ERRCR REPORT; LOOK IN 
THE LISTING FOR_THAT TEST NUMBER WHICH WAS TYPED OUT AND THEN 
NOTE THE PC OF THE ERROR REPORT THIS WAY THE EXACT FUNCTION OF 
THE TEST CAN BE DETERMINED. 


ERRORS 


a DE SeRIBED poe ous THERE Reis ALWAYS BE A TEST NUMBER AND 
PC TYPED OUT AT THE TIME OF AN ERROR (PROVIDING SW 13=0 ANS SW 

le=0). IN MOST CASES ADOT TIONAL INFORMATION WILL BE SUPPLIED 
IN THE THE ERROR MESSAGE TO GIVE THE OPERATOR AN INDICATION OF 


ERROR RECOVERY 


IF FOR SOME REASON THE OMC11 SHOULD "HANG THE BUS’ (GAIN 

ala | OF BUS SO THAT CONSOLE MANUAL FUNCTIONS ARE INHIBITED) 
N INIT OR POWER DOWN/UP_IS NECESSARY FOR OPERATOR TO REGAIN 
NTROL OF CP F_ TH ppg ; 


CON 

TSTNO’ (ADORESS 1226)FOR THE NUMBER 

RUNNING AT THE TIME OF THE CATASTROPHIC ERROR. INT 
THE OPERATOR WILL . a N IDER AS TO WHAT THE DMC11 WAS Rots 
AT THE TIME OF THE ERRO 


RESTRICTIONS 

STARTING RESTRICTIONS 

SEE SECTION 4. (PLEASE) 

gt ATue TRELE SHONLD, Be RAT Are BS REG GURROL ES? OF HOW PROGRAM WAS 


STARTED S LISTING ALONG WITH 
COMPLETLY ISOLATE 





PROBLEM 
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OPERATING RESTRICTIONS 
THE FIRST TIME A DMC11 DIAGNOSTIC . LOADED INTO CORE AND RUN 
E MUST SET UP. THIS IS 


AUSE TH 
STATUS TABLE IS OVERLAYED. THE CURRENT rHRAMETERS IN THE 
STATUS TABLE ARE USED WHEN SWO7=1 ON START UP. 


HARDKARE CONFIGURATION RESTRICTIONS 





OMC1: (MS200)- JUMPER Wl MUST BE IN, AND SWITCH 7 OF E7& MUST 
BE if! THE OFF POSITION. 





TOP (M8204)- JUMPER W1 MUST BE IN. 





Na UNIT(M8201)- JUMPERS Wi, We, AND WY MUST BE_IN. JUMPERS 
arr a4 MUST BE OUT.’ SW8 OF E26 MUST BE IN THE ON 





LINE UNIT (M8202)- JUMPER Wl MUST BE IN. SWS OF E26 MUST BE 
IN THE OFF POSITION. 


MISCELLANEOUS 








EXECUTION TIME 


ALL DMC11 DEVICE DIAGNOSTICS WILL GIVE AN ‘END ass" ae 

(PROVIDING NO ERRORS AND SW1l2=0) WITHIN 4-MINS. S$ 
ASSUMING SW11=1 (DELETE ITERATIONS) IS SET TO GIVE THE Fastest 
POSSIBLE EXECUTION. THE ACTUAL EXECUTION TIME DEFENDS GREATLY 
ON Ri 7 POP11 CPU CONFIGURATION AND THE AMOUNT OF MEMORY IN THE 





PASS COMPLETE 


NOTE: EVERY TIME THE PROGRAM IS STARTED; ip TESTS WiLL RUN 
AS IF SW11 (DELETE ITERATIONS) WAS (21). THIS IS TO 
ether © NO HARD ERRORS* AS SOON AS POSSTBL ie HEREFORE THE 

FIRST PASS att TIME PROGRAM IS siagteye WILL BE A "QUICK 
PASS’ UNTIL OMC1i*S IN SYSTEM ARE TESTED. WHEN THE 
DIAGNOSTIC Has * COMPLETED A PASS THE FOLLOWING IS AN EXAMPLE OF 
THE PRINT OUT TO BE EXPECTED. 


END PASS DZDMC CSR: 175000 VEC: 9300 PASSES: 000001 
ERRORS: 000000 


NOTE: THE PASS COUNT AND ERROR COUNTS ARE gar FOR 
Bs ns went — + 
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KEY LOCATIONS 


RETURN (1214) CONTAINS THE ADDRESS WHERE PROGRAM WILL RETURN 
WHEN ITERATION COUNT IS REACHED OR IF LOOP ON 
TEST IS ASSERTED. 


NEXT (1216) CONTAINS THE ADDRESS OF THE NEXT TEST TO BE 
PEFORMED. 


TSTNO (1226) CONTAINS THE NUMBER OF THE TEST NOW BEING 
PEFORMED. 


RUN (1316) THE BIT IN ’RUN’ ALWAYS POINTS TO THE DMC11 
CURRENTLY BEING TESTED. _ EXAMPLE: (RUN) 
1302/0000000001000090 MEANS THAT DMC1i NO.06 
IS THE DMC11 NOW RUNNING. 


DMCROO-DMCR17 
DMSTOO-DMST17 
(1500)-( 1649) 
) THESE LOCATIONS CONTAIN THE INFORMATION NEEDED 
TO TEST UP TO 16 (DECI MAL ) piclis SEQUENTIAL’. 
THEY CONTAIN THE TOR AND STATUS 
CONCERNING THE CONE IGvBet YEN OF EACH DMCi1. 


DMACTV (1306) EACH BIT SET_IN THIS antes OTA ly 
THE ASSOCIATED OMC11 WILL BE TESTED TURN. 
ries see 4 {27¢/onoonocns0r L111 MEANS 


MC11 NO. 00;01, LL BE TESTED. 
EXAMPLE: (DMACTV)’ 12? Pewaaneninptiaey MEANS 
THAT DMC11 NO. 00,04 WILL BE TESTED. 


DMCSR (1402) CONTAINS THE CSR OF THE CURRENT DMC1i UNDER 


*STATUS TABLE’ (1500-1640) 


THE TABLE IS FILLED BY AUTO SIZING OR BY THE MANUAL PARAMETER 
INPUT eel brews AS DESCRIBED PREVIOUSLY. ALSO IF DESIRED SY 
USER; LOCATIONS MAY BE_ALTERED BY HAND (TOGGLED IN) TO 
SUIT THE SPECIFIC CONFIGURATION. 


ne EXAMPLE STATUS MAP — BELOW oral poner A 
Cc 
ale THE MAP IS A BESCRIPTION OF THE BITS FOR ERCH MAP 


MAP OF DMC11 STATUS 


PC CSR STAT1 STAT2 STATS 


001500 160010 145310 177777 000000 





NO1. 
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477 001510 160020 0163e0 o000000 Odg0can 
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Cover vcevcnvarient & 4. 
3 yi 
“Cn 


(woe oc 
(rt 4. Goatees 


me ere 









EACH MAP ENTRY CONTAINS 4 WORDS. WHICH CONTAIN THE S7GTUS 
INFORMATION FOR 1 DMC1L. THE PC SHOWS WHERE IN CORE MEMORY 

FI THE 4 HORUS 1S. IN THE EXAMPLE ABOVE THE FIRST 
ONE'S STATUS IS IN LOCATIONS, 1500) 1502) 21 1504, AND 1506. THE 
SECOND brie status 1S LOCATED A i${0, 152, 1814, NO 15i6. 
THE INFORMATION CONTAINED IN ERCH 4 WORD ENTR, fs DEFINED 45 


FOLLOW ey 

CSR: CONTAINS OMC11 CSR ADOSESS 

STATI: aT. TS “% ce 5 mCi sere VECTOR Ba 
Stee 


btalisldalealralealin) 


Ly! 
S OMCLI BR PRIORITY LEVEL 
$i 


ITCH PACe!l (DOCME LINE Nu MBER ) 
WITCH Pac 82 (aMa73 "BOOT BOD 
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METHOD OF AUTO SIZING 
FINDING THE CONTROL STATUS REGISTER. 


THE AUTO-SIZING ROUTINE FINDS A DMCL1 AS FOLLO STARTS 
ar BDDR ss 1 1g 000 AND TESTS ALL AD FESS IN THCAEMENTS 9 F 19 ue 
TO AND INCLUDING ADDRESS 187760, F THE ADDRESS DOES NOT TIME 
Sern Sea Eton TS 12 BONES ane PaeaT FROM wATNG OB ct OR 
~ e ‘ = Us 

125252 OR 626 A OMCLI ene BEEN FOUND, IF NOT, +e acORESs is 
UPDAT D a 10 AND T RCH CONTIN a = INDICATES A 
pyc NO. CRO Lesese INDICATES A OMCL1 WITH 
& ans Q "eee INDICATES | A Bnet mai THE DOCMP CROM. FURTHER 
sets ARE PERFOR NED. AT THIS POINT TO DETERMINE WHICH LINE 
UNIT. IF ANY, ISIN IF LOOP-BACK CONNECTOR IS 
INSTALLED AND VARIOUS SWITCH SETTINGS ON THE LINE UNIT. THIS 
7S WHY _ THE STATL TABLE MUST BE VERIFIED BY THE USER AND IF 
ANY OF ORMATION ‘ait AGREE WITH THE HARDWARE THE 


q aEaD 

pipes tt MUST BE RESTARTED ANDO THE QUESTIONS MUST BE 
ANSWERED. ALL 4 iN es SYSTEM WILL BE FOUND BY THE 

AUTO-SIZER. IF IT DOES NOT FIND A OMC11 THE DIAGNOSTIC MUST 

BE RESTARTED AND T Se St ions ANSWERED. 

FINCING THE VECTOR AND GR LEVEL 

THE VECTOR ht (ADORESS 300-776) 


SF , 
ere US 18 starve aY'7 AiG THe ORE 15 ect TP INTERRFY, 


E Ne 
PROSLEM IS FIXED; THE PROGRAM SHOULD BE RE-SETUP AGAIN TO GET 
coer ff NTER TE iy § FS SORE Tae RODE 3Fen 3 
+4 7 ° PORTED QS TH 
YET hore re V REPS sere : ORE toe set 
uP BY" YOU; THERE 1S A PROBLEM AND AUTO SIZING SHOLLD NOT 


SOFTWARE SWITCH REGISTER 


JF THE OLAGNOSTIC 1S RUN ON AN 11004 08 QTHER CPU. HITHOUT 18 
SHITCH REGISTER SOFTWARE SuITEH REGISTER 25 USED To 
BLL Ol ae ae SAME esate ree 5.85, 5 AUER eg oe 
y apt ve > 
BNO ar aL ORES Civeee) THIS SOPTUARE SAYER 
SER? ster ee 
CONTROL: 
70 OBTAIN CONTROL AT ANY ALLOWABLE TIME QURING EXECUTION. OF 
THE OPERATOR TYPES A CTRL ONSOLE 


THE DIAG 
TERMINAL KEY sheep. RS SOON AS THE CTRL Go IS See cOGN zED, 8) 
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S62 THE DIAGNOSTIC, THE FOLLOWING MESSAGE WILL GE OISPLAYESD: 
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, 
re IOOrraw 
£610.03 


dotut 


a 


ld Od bt od ot ot crvesiest 
itt in 


060.000.0009 0000 00 00 Co Co cob 


eten ities titi wae ite JO COO ULE Gotu 


coe Oe Oe oP On oP CY OP On OP OF (PO OP OP OF OP OP CTO ONT UT ONTO COTO TOTO tong 


020+ 0-0 20-0 so oe =f Bie LR EL e 


condi ££ oor -09.000 NIUE to 


SWR=XXXXXX NEW? 


WHERE XXXXXX IS THE CURRENT CONTENTS OF THE SOFTWARE SWITCH 
REGISTER IN OCTA THE SOFTWARE CONTROL ROUTINE WILL THEM 
auAIT, OPERATOR ACTION, AT WHICH TIME THE OPERATOR IS REGUIRED 
TO TYPE ONE OR, MORE OF THE LEGAL CHARACTERS: 1) 9 - 7, 2) 
LINE TTEED COED ) 3) CARRIAGE RETURN(<CR>). OR 4) CGONTRAL-U 

(CTRL U). NO’ CHECK IS MADE FOR LEGALITY. IF THE TNEUT 
cHRscTER 1g NOT A <LF>, <CR>, OR CTRL UIT IS ASSUMED TO BE 


To CHANGE TH CONTENTS OF THE oak THE OPERATOR SIMPLY see 
THE NEW DESIRED VALUE IN O CTAL - HEROING ERO NEED NOT 
TYPED. AND FERNINATES THE INPUT STRING WITHA <CR> OR <LF> 
DEPENDING ON THE PROGRAM Seer Ses tae as DESCRIBED Ea 
THE INPUT VALUE WILL BE TRUNCATED TO THE LAST & DIGITS TYPED. 
AT LEAST ONE DIGIT MUST BE TYPED ON any GIVEN INPUT aTR ENG 
PRIOR TO THE TERMINATOR BEFORE A CHANGE TO THE SSR WILL OCCUR. 


WHEN THE INPUT STRING IS Ne ald Ms WITH a <CR) THE DIAGNOSTIC 

WILL CONTINUE EXECUTION FROM THE PCINT_ AT WHICH pA WAS 
INTERRUPTED, IF_A <CR> IS THE ONLY THING “TYPED THE PROGRAM 
WILL CONTINUE WITHOUT CHANGING THE SSR. THE <LF> DIFFERS FROM 
i ee oY RESTARTING THE PROGRAM AS IF IT WERE RESTARTED AT 


IF A CTRL U IS TYPED AT ANY POINT IN THE INPUT STRING PRIOR TO 
THE NATOR THE INPUT VALUE ATLL BE DISREGARDED AND THE 
Het OR TEDTAvED (SWR = XXXXXX NEW? 


TQ SET THE SSR FOR THE STARTING pH T CHES FIRST LOAC THE 
pimenOst IC, THEN HIT CTRL GS, THEN START THE DIAGNOSTIC. 


;2MRINDEC-11-DZDME-A = OMC 1) LINE _UNIT TESTS 
; #COPYRIGHT 1976, DIGITAL EQU ORP., MAYNARD, MASS. 01754 


Stet ING PROCEDURE 
LOA Pro eree 
;LOAD_ ADDR eed 
:guRsO BUTGe! mit 
pat okt at REN NT OMC11 a 
UT NEW OMC11 PARAMETER 


iPESGRa Nt Mi TYPE Bi ht DZOME-R OMC11 DOCMP LINE UNIT TESTS” 
PROGRAM WILL A STA 
PROGR WILL TYPE “R” TO INDICATE THAT TESTING HAS STARTED 
THE END OF A PASS, PROGRAM WILL TYPE PASS COMPLETE MESSAGE 








FOe2 
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DSOMEA.PLI INTRODUCTION TO OMC1] OLAGNOSCTIC 

13 sHND THEN RESUME TESTING 

eC SUBSEQUENT RESTARTS WILL NOT TYPE PROGRAM TITLE 

b22 

S23 

654 

$25 :SHITCH REGISTER OPTIONS 

S28 ¢ eoeeaeoeeoeeasesoussooeo 

539 190909 SwiS=100000 :=1,HALT ON ERROR 

639 64099 Sw 4=40000 :=1;LOOP_ON CURRENT 1 TEST 

630 42990 SW13=20C00 t=] INHIBIT ERROR TYPEOUT 

£31 510000 5w12=10000 t=] DELETE TYPEOUT/BELL ON ERROR. 

£32 00 5W11=4000 s21, INNIBIT_ ITERATIONS 

533 502000 5wl0=2000 t=] ESCAPE TO NEXT Test oN ERROR 

34 99100 5WO9=1000 t=1'LOOP WITH CURRENT DAT 

535 000909 SwO8=400 :=1'LOOP CN ERROR 

535 9205 5072200 t=]'USE CURRENT DMC11 PARAMETERS =0,8 SUTOSIZE DMCLI 

53; 900100 5WwOb=109 t=!’ HALT BEFORE CLOCKING MICRO-PROCESSCR INSTRUCTION 

£39 909940 Swos=40 

539 990020 SWO4=20 

£45 99910 5wO3=10 ;RESELECT DNCII7S 10 BE TESTED (ACTIVE) 

gui 509005 Swoe= LOCK ON TEST SELECT is 

545 nance SWols2 :RESTART PROGRAN AT SELECTED TEST 

B43 603561 5wod=1 SINFUT DMCLL PARAMETERS 















DIONE _ MACY 
DZDMEA.P11 


‘ee 
Yai 


(Hor Mammon mare 
Vary ervaresrvarvelac) 
U1 Gore (9.0 


ests 


ata 


001200 


gOS 746 


de2626 


100000 


nO000! 





GOe2 


;GENERAL REGISTER 
GENERAL REGISTER 
;GENERAL REGISTER 
;GENERAL REGISTER 
; GENERAL Rete TER 
;GENERAL REGISTER 


; R 
PROCESSOR STACK POINTER 
PROGRAM COUNTER 


;LOCATION EQUIVALENCIES 


PS=177776 
STACK=1200 


eae DEFINITIONS 





;PROCESSOR STATUS WORD 
START OF PROCESSOR STACK 


;DECREMENT PROCESSOR STACK 1 
INCREMENT PROCESSOR STACK 1 
SA VE RO ON STACK 

;RESTORE RO FROM STACK 





WORD 
WORD 


6 ME TWICE 
-EQUIV EMT,HLT ‘BASIC DEFINITION OF ERROR CALL 
;81T DEFINITIONS 


BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
BIT 
SIT 
BIT 


Ore) £ UI" 53 Oe 0 





ob tk ee ee a Oem cm 


Ceo Ce Ce dt ke 
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PAGE 
TRAPCATCHER FOR UNEXPECTED INTERUPTS 


0c0990 


00017" 
900000 
000000 


009299 
000137 
001000 
005377 

104 
001200 


177570 
177570 





ff RRRARERRERRRH EEE ER AREER ERE EERIE EERE EEE EAS REESE LES BEEBE 
I nen ‘ wes INTERRUPTS 
STANDARD ATCHER™ IS_PLACED 
t BETHEEN ADDRESS O 16 oe 776. 
;I1T LOOKS LIKE “PC+2 HALT 


: f RRRARAKAAA LER KALEA LAL ELA RE REEL ELER ERLE ARLE ERE ELL ELE ALE LLL LESS HKFLES 


.20 
s;STANDARD INTERRUPT VECTORS 


i POWER FAIL it ge 


ICE AT LEVEL 7 
t GENERAL HANDLER lei SERVICE 
;SERVICE AT LEVEL 


;SAVE FOR ACT-11 OR XXOP 

RETURN ADDRESS IF UNDER ACT-11 OR XxDP 
SAVE FOR ACT-11 OR XXOP 

3FOR USE WITH ACT-11 OR XXDP 

sACT-11 PROGRAM CHARACTERISTICS 


;SOFTWARE DISPLAY REGISTER 
;SOFTWARE SWITCH REGISTER 


;GO TO START OF PROGRAM 


(377) < 12> /MAINDEC~11-D2DME-8/< 377) 
11 DOCMP LINE UNIT TESTS/<377> 





; INDIRECT POINTERS TO SWITCH REGISTER AND LIGHT DISPLAY 





po eee ee 





DZONE _MACYLI 


OMEA.P11 


—o.: 


~J 

ut 

wo 
ONVNVONVVOOON 
OOVDOO0000 





177580 
177562 
177564 
177565 


099009 


000800 


009990 


000001 
000008 


001472 
O01E76 
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aM PARAMETERS, VARIABLES, AND TRAP CALLS. 





10e 


; INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 


TKCSR: 


TBCeR: 
TPOBR: 


;PROGRAM CONTROL PARAMETERS 


CSTERR: 


ONOOVOOWOOO 


177560 


177566 


; PROGRAM ee 





OM. MAP-& 
CNT.MAP=4 





; TELETYPE KEYBOARD CONTROL REGISTER 
; TELETYPE _KEYSOARD DATA BUFFER 
;TELEPRINTER CONTROL REGISTER - 

; TELEPRINTER DATA SUFFER 

; SCOPE eee FOR LOOP ON TEST 

DOR T 


A S ON _CURREN 
;NUMBER OF ITERATIONS THAT CURRENT TEST WILL SE 
:NUMBER 0 E COMPLETED 
R 
PC OF LAST ERROR CALL 
;SWITCHES AT START OF .PROGRAM 


:DM STATUS WORD STORAGE 


ree STORAGE 


: AGE 
;STACK POINTER STORAGE 
;PROGRAM COUNTER STORAGE 


;HIGHEST LOCATION FOR NPR'S 


; BLE NUMBER 
POINTER TO RUNNING DEVICE. 


;TABLE POINTER. 
; TABLE POINTER 

















Tf) 


<0 MACY11 
DZOMEA.P11 





901330 
001330 
00133e 
091334 
001336 
001340 
001342 
826 001344 
828 001346 
830 001350 
832 001352 
834 001354 
836 001356 
838 001360 


Pewee mcocpmavcomeoescocoGD mmw 
TUTUTD MU) & + b+ + 0 + bo 
Gotu -O.00 IM Ou 9 


B4e 001364 


104400 


005520 





PAGE 23 
M PARAMETERS, VARIABLES, AND TRAP CALLS. 


;PROGRAM CONTROL FLAGS 


i PROGRAM INITIALIZATION FLAG 
R OCCURED 


I 
‘ON FIRST PASS OF EACH DMC11 ITERATIONS WILL 


3 DET NT TONS FOR TRAP SUBROUTINE CALLS 
;POINTERS TO SUBROUTINES CAN BE FOUN 
SIN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


f S RRERRE RRL ELE RAH EE LRAT KELL LEE LK EE LEE LER EEE LEER EEL EEE LELE RL ERLE ERS LE 


" TRPTAB: 
SCOPE=TRAP+0 

. SCOP 
SCOP 1=TRAP+1 

. SCOP 
TYPESTRAPYE 
INSTR=TRAP+3 

INSTR 
INSTER=TRAP+Y 
PARAN= TRAP +S . 
SAVOS=TRAR +S 
RESOS=TRAP+7 


CONVRT= =TRAB +10 


CNVRT= sTRAFS 1 
MSTCLR=TRAP+12 
DELAY=TRAP+13 
ROMCLK=TRABS14 


DATACLK= TRAPSIS, 


TIMER=TRAP+16 
. TIMER 


1s RRRAREL RARE RARE RARE RARER RAREEREEASRRAARAR AREA RALEAAERAREEEREREE SERS 


TO SCOPE LOOP AND ITERATION HANDLER 
TO LOOP ON CURRENT DATA HANDLER 

TO TELETYPE OUTPUT ROUTINE 

TO ASCII STRING INPUT ROUTINE 

TO INPUT ERROR HANDLER 

TO NUMERICAL DATA INPUT ROUTINE 

TO REGISTER SAVE ROUTINE 

TO REGISTER RESTORE ROUTINE 

TO DATA OUTPUT ROUTINE 


TO DATA OUTPUT ROUNTINE WITHOUT CR/LF. 


TO ISUE A MASTER CLEAR 
TO DELAY 

TO CLOCK ROM ONCE 

TO CLK DATA 

TO DELAY A CLOCK TICK 





BE 
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85C 001266 
851 001370 
8Se 001372 


ae 
wr 
Bg 


@ 

“J 

o 
ooo oOOoOO 


oO 
OcCad0O O00 


90: DO1SEE 
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PROGRAM PARAMETERS, VARIABLES, AND TRAP CALLS. 


;DMC11 CONTROL INDICATORS FOR CURRENT DMC11 UNDER TEST 


000090 STATI: Q 
009000 STATe: Q 
000000 STAT3: 0 


;OMC11 VECTOR AND REGISTER INDIRECT POINTERS 


~o0000 DMRVEC: 0 ;POINTER TO DMC11 RECEIVER INTERRUPT VECTOR 
000000 OMRLVL: 0 ‘POINTER TO DMC11 RECEIVER INTERRUPT SERVICE PS 
000000 DMTVEC: O ;POINTER TO DMC11 TRANSMITTER INTERRUPT VECTOR 
000009 DMTLVL: Q ;POINTER TO DMC11 TRANSMITTER INTERRUPT SERVICE FS 
000009 DMCSR: 0 POINTER TO DMC11 CONTROL STATUS REGISTER 

000900 DMCSRH: OQ ;POINTER TO OMC11 TROL ATA REGISTER HIGH BYTE. 
000000 CT 0 POINTER TO DMC11 CONTOL OUT REGIST * 

000000 DMPO4: 0 ;POINTER TO DMC11 PORT REGISTE:’SEL 4 

000000 DMPO6: O POINTER TO DMCL11 PORT REGISTER(SEL g) 


;DMC11 STATUS TABLE AND ADDRESS ASSIGNMENTS 


4 RS ee ee eH Re He eH Hm ee eH eee 


001500 Pi 

000001 OMCROO: .BLKW 1 ;CONTROL STATUS peels FOR DMC11 NUMBER OO 
000001 ODMS100: .BLKW 1 VECTOR FOR OMC11 N 

000901 OMSe00: .BLKH 1 :DDCMP_LINE# FOR ONT NUMBER O00 

000001 DMS300: .BLKW 1 :3RD STATUS WORD 

009901 DMCRO1: .BLKH 1 3 CONTROL STATUS py: FOR OMCi1 NUMBER Ol 
000001 DMS101: .BLKW 1! :VECTOR FOR DMC11 R 

000001 OMS201: .BLKW 1 ;DOCMP_LINE® FOR MeL NUMBER 91 

000001 OMS301: .BLKW 1 :3RD STATUS WORD . 
000001 DMCROe: .BLKW 1 3 CONTROL STATUS mots FOR DMC11 NUMSER 02 
000001 DMS10e: .BLKW 1 ; VECTOR FOR DMC11 NUMBER 

000001 DMS20e: .BLKW 1 ;DOCMP_LINE# FOR ONT NUMBER 02 

900001 DMS30e: .BLKW 1 :3RD STATUS WORD 

000001 DMCRO3: .BLKW 1 i CONTROL STATUS ReGis TEs FOR OMC11 NUMBER 03 
009001 DMS103: .BLKW 1 ;VECTOR FOR DMC11 NUMBER 03. 

000001 DMS203: .BLKW 1 :DDCMP LINE# FOR oe LI NUMBER 03 

000001 OMS303: .BLKW 1 :3RO STATUS WORD 

000001 OMCROY: .BLKW 1 ;CONTROL STATUS REGISTER A OMC11 NUMBER 04 
000001 DMS104: .BLKW 1 ; VECTOR FOR OMC11 NUMSER 

00000: OMS204: .BLKW 1 ;DDCMP_LINE® FOR DMC11 NUMBER 04 

000001 DMS304: .BLKW 1 :3RO STATUS WORD 

000001 OMCROS: .BLKW 1 5 CONTROL STATUS Recrs TEs FOR OMC11 NUNSER O5 
009001 OMS105: .BLKW 1 ; VECTOR FOR OMC11 NUMBER 

009001 OMS20S: .BLKW 1 :DDCMP_LINE® FOR Neti NUMBER O05 

C0000! OMS30S: .BLKW 1 :3RD STATUS WORD 
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ee 
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691574 
001576 


001690 


001616 
001626 


001626 
001630 
091632 
091634 

001636 


001640 


OO1S46 
pp lees 


001656 
001669 


001656 
palere 


001676 
001700 


pO apat 


000091 
000001 


900001 
900901 


00000! 
000001 


000001 
009001 


000001 
090001 


000001 
009001 


000001 
g09001 


000081 
090001 


000001 
ococ0d 
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PROGRAM PARAMETERS, vaeTABLES. AND TRAP CALLS. 





DMCRO6: .BLKW 
DMS106: .8LKW 
DMS206: .BLKW 
DMS306: .BLKW 
OMCRO?7: .BLKW 
DMS107: .BLKW 
OMS207: .BLKW 
DMS307: .BLKW 
DMCR1O: .BLKW 
DMS110: .BLKW 
DMS210: .BLKW 
DMS310: .BLKW 
OMCR11: .BLKW 
OMS111: .BLKW 
DMSell: .BLKW 
DMS311i: .BLKW 
DMCRie: .BLKW 
DMSile: .BLKW 
MS2le: .BLKW 
DMS3le: .BLKW 
OMCR13: .BLKW 
OMS113: .BLKII 
OMSel3: .BLKW 
DMS313: .BLKW 
DMCR14: .BLKW 
DMS114: .SLKW 
DMS214: .BLKW 
DMS314: .BLKW 
OMCRIS: .BLKW 
DOMS115: .BLKW 
DMS215: .BLKW 
DMS315: .BLKW 
DMCR16: .BLKW 
DMS116: .BLKW 
DMS216: .SLKW 
OMS316: .BLKW 
DMCR17: .BLKW 
DMS117: .BLKW 
DMS217: .BLKW 
DMS317: .BLKW 
OM.END: 000000 





o-— pp — p—- p — 


rb —— — pp a ob -— +—- oe — p> + pp 


; CONTROL STATUS REGISTER FOR OMC11 NUMBER 
;VECTOR FOR OMC11 NUMBER 06 
;DDCMP_LINE® FOR OMCil NUMBER 06 


:3RD STATUS WORD 


; CONTROL aA eee FOR OMC11 NUMBER 


; VECTOR FOR 


; DDCMP 


LINE® FOR DMC11 NUMBER 07 


:3RD STATUS WORD 


;CONTROL STATUS ye fl mn DMC11 NUMBER ! 
:VECTOR FOR DMC11 NUMBER 10 
:DDCMP_LINE® FOR oMct NUMBER 10 


;3RD STATUS WORD 


;CONTROL STATUS REGISTER FOR DMC11 NUMBER 
¥ Cll NUMBER 11 

# FOR DMC11 NUMBER ll 
: 3D STATUS "Yo RD 


3 CONTROL STATUS REGISTER FOR DMC11 NUMBER 
; VECTOR 


: DDCMP 


FOR OMC11 


NUM 
LINE® FOR DMC11 NUMBER 12 


:3RD STATUS WORD 


3 CONTROL STATUS ye A's DMC11 NUMBER 


;VECTOR FOR OMNC11_N 


;DDCMP_LINE# FOR OMC11 NUMBER 13 


:3RD STATUS WORD 


6 NTROL STATUS mee to FOR DMC11 NUMBER 


VECTOR FOR DMu11_N 


: DOCMP LINES FOR DMC11 NUMBER 14 


;3RD STATUS WORD 


; CONTROL a, REGISTER FOR DMC11 NUMBER 


; VECTOR FOR 


11 NU 
s DOCMP LINE# FOR OMC11 NUMBER 1S 


32RD STATUS WORD 


;CONTROL STATUS REGISTER FOR DMC11 NUMBER 
NUMBER 1 


:VECTOR FOR DMC11 


;DDCMP_LINE# FOR OMC11 NUMBER 16 


:3RD STATUS WORD 


;CONTROL STATUS pg tt ‘ee OMC11 NUMBER 


VECTOR FOR DMC11 


NUM 
:DDCMP_LINE® FOR OMC11 NUMBER 17 


:3RD STATUS WORD 






07 












DIDME 
OZOMEA.P11 


958 00170e 
9539 0017Ce 
960 001704 


%2 001706 
$63 901710 


977 001732 
978 001734 


980 001736 
381 601740 


$83 001742 
984 001744 


986 001746 
987 001750 


989 001752 
990 001754 


992 001756 
001760 


$95 001762 
996 001764 


998 901766 
9339 901770 


C1 001772 
O2 001774 


0 
0 
0 
904 001776 
; ? 002000 


a ae 
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000008 
000000 


000000 
900900 


900000 
008000 
008000 
000080 
000000 
000800 


000900 
000800 


O009CO 
oco000 


000099 
000000 


o0c900 
000900 


000909 
000009 


000000 
009000 


000000 
007000 


009000 
000500 


o00009 
000000 


000000 
000000 


00099 
00000 
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;DMC11 PASS COUNT AND ERROR COUNT TABLE 


CNT.MAP: 
PACTOO: 
ERCTOO: 


PACTOL: 
ERCTOL: 


PACTOe: 
ERCTOe: 


PACTO?: 
ERCTOS3: 


PACTOY: 
ERCTO4: 


PACTOS: 
ERCTOS: 


PACTOE: 
ERCTO6: 


PACTO?: 
ERCTO?: 


PACT1O: 
ERCT10: 


PACTII: 
ERCT11: 


PACTIe: 
ERCTle: 


PACT13: 
ERCT13: 


PACTLY: 
ERCT14: 


PACTIS: 
ERCTIS: 


PACTIE: 
ERCTI6: 


PACTL?: 
ERCT17: 





00 00 00 00 00 00 00 00 020 00 Of 00 O00 ODO oo a0" 





;PASS COUNT FOR DMC11 NUMBER 00 
sERROR COUNT FOR DMC11 NUMBER OO 


;PASS COUNT FOR DMC11 NUMBER O01 
sERROR COUNT FOR DMC11 NUMBER 01 


;PASS COUNT FOR DMC11 NUMBER Oe 
ERROR COUNT FOR DMC11 NUMBER C2 


;PASS COUNT FOR DMC11 NUMBER 03 
ERROR COUNT FOR DMC11 NUMBER 03 


;PASS COUNT FOR DMC11 NUMBER 04 
ERROR COUNT FOR DMC11 NUMBER O4 


;PASS COUNT FOR DMC11 NUMBER OS 
ERROR COUNT FOR DMC11 NUMBER OS 


;PASS COUNT FOR DMC11 NUMBER 06 
ERROR COUNT FOR DMC11 NUMBER 06 


;PASS COUNT FOR DMC11 NUMBER 07 
ERROR COUNT FOR DMC11 NUMBER 07 


;PASS COUNT FOR DMC11 NUMBER 10 
ERROR COUNT FOR DMC11 NUMBER 10 


;PASS COUNT FOR DMC11 NUMBER 11 
ERROR COUNT FOR DMC11 NUMBER 11 


;PASS COUNT FOR DMC11 NUMBER le 
ERROR COUNT FOR DMC11 NUMBER 12 


;PASS COUNT FOR DMC11 NUMBER 13 
ERROR COUNT FO? OMC11 NUMBER 13 


;PASS COUNT FOR DMC11 NUMBER 14 
sERROR COUNT FOR DMC11 NUMBER 14 


;PASS COUNT FOR DMC11 NUMBER 1S 
ERROR COUNT FOR DMC11 NUMBER 15 


;PASS COUNT FOR DMC11 NUMBER 16 
ERROR COUNT FOR DMC11 NUMBER 16 


;PASS COUNT FOR DMC11 NUMBER 17 
ERROR COUNT FOR DMC11 NUMSER 17 











DZDMEA.P11 
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18 14 is I il 


CSR: 


STATI: 


STATe: 


STATS: 


N02. 


FORMAT OF STATUS TABLE 


10 09 O08 O7 0&6 OS O4Y O3 C2 O91 00 


I 
L Pk SO 2G Be ee : CSR 


wi ee Oe iy 2 Ae BS ee Se YR 
[o2e @. 97. £2.53 ..7.,.9 .8- 3% STATL 

ae ly Se) ie a Ce Ge ils ae 

COs ty are ES oy ae 
. @€29 4.2.8.3 # #1! STAT2 

ie se we: One fies Pes la aor wee Sr 

tf & P88 fc .4 8-3 
eh i So) ea? Fae Ste Ge Pe ae sO STAT3 

SA te Boor 2s. € eS 2 


NO TURNAROUND CONN 

NE UNIT IS AN 

NE UNIT IS AN M8202 

LINE UNIT 

IS OMC11 BR PRIORITY LEVEL 
S 


S SWITCH PAC#1 (DDCMP LINE NUMBER) 
E IS SWITCH PAC#2 (BM873 BOOT ADD) 


0 FREE RUNING TESTS ON KMC 


<A P--00r-O 
zr r-z- 


mo sm 


I 
I 
0 
“11 
I 


—- oO-~x<~ ONNNNH HH 


TB 








SET TO A ONE MANUALLY [PROGRAMS G AND H ONLY]) 








fete 
iRee 
L3E8 
1o78 
107: o92902 912737 
TReS  FRSAYS B1e7 Ob 
t5°3 855814 615737 
1874 092022 D13737 
3075 002930 905037 
127 602034 105037 
Lov? 902049 105037 
157e 800044 912737 
1573 9020S2 012737 
1080 932965 6012737 
108: 032066 O12700 
1082 902072 905020 
1583 902074 922790 
1084 O62100 901374 
2085 002102 005037 
1086 392196 O1e727 
158? 005114 612737 
ie 
1238 002122 C1374s 
1350 852126 o137 
1081 802132 601273: 
1082 802140 S!e737 
1533 OCE146 512737 
1394 502154 022777 
1585 Doeib2 1402 
1386 OSe164 90040" 
| +a erettt Reeees 
oo wwe! — t -t 
| 1099 0176 Q1é737 
/ t180 802204 012637 
| 2181 82210 012637 
«tthe BSEEtO Fhe8s2 
11D 602220 901006 
| tiie poss. peer 
| 4105 902230 o014 
| J186 O223e io8ace 
| JI8? 602836 O047 
| Lie 802242 017737 
| TI8S 8f5se5 AnS737 
| Jlis 02254 o014 
i123 90225— 90503 
tiiz ppecte 032727 
| 3333 60227 291038 
| 3234 Eee 10573 
| 4135 O0¢e7— 100007 
| $448 geesOO Bee? 
eee! oc2es04 weeww 
| LLIB. ESZ2e il4402 





B03 
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INITIALIZATION AND START UP 
: PROGRAM INITIAL IZATION 
sLOCK OUT INTERRUPTS 
oer UE EROS Part WES TO 
“LEAR PROGRAM CONTROL FLAGS AND COUNTS 
: TYPE TITLE MESSAGE 
D80349 177776 START: NOV #340,PS_ sLOCK 9 guT_ INTERRUPTS 
sneS03 900924 MOV e.PFAIC 2e24 =; SET Ue Sones FAIL VECTOR 
A51310 01314 MOV DMNUM, SAVNUM AVE NUMBER OF DEVICES IN 
aly 2 CLR Sw ELC SELEAR SOFT TYPESUT FLAG 
55138 CURB ERRELG :CLEAR ERROR 
601327 CLRBs«GV..FLG : ZERO QUICK VERIFY FLAG 
601470 001220 MOV 80M. NeP-10, CREAM; GET MAP E 
60is76 O0i3ee Moy SCNT. MAP-4'MILK :GET PASS ga MAP POINTER 
700908 601316 MOV sSITiS. RUN sEOINT POINTER TO FIRST DEVICE. 
001702 eee ae ‘ai ) PASS COUNT POINTER TS BO 
o02002 ae #ONT.MAP+100, RO tEbRE YET? 
BNE 233 KEEP GOING 
001234 a CSTERR ib AR LAST ERROR POINTER 
6000: 001226 MOV #1, TSTNO UP FOR 7E Mee 
Gates sdier4 May 8. START, RETURN SE PF OR EC POWER FAIL BEFORE 
o00006 MoV gab, -( 52 3 15S! CURRENT VECTORS 
RAARAAY MOV 84,-( 
552186 29900 Moy aS a4 'SET UP_FOR TIMEOUT 
Tsess Beioe: Moy swITPSTO.SHR SET SWR_TO HARD SWR ADDRESS 
177570 Dole00 MOV Bi77S570 CISPLay :5ET DISPLAY TO HARD SUR 
177777 | 177020 2MP 21,350 REFERENCE HAROWARE SHI TCH REGISTER 
5 e 
a STF IT EXISTS AND NOT = -1 USE HARD SUR 
6$: CMP (SP) +, (SP2+ “ADJUST STACK 
90917 01202 MOY abies Suk ABSINT ER TO SOFT 
695174 51200 MOV sDISPREG, OISPLAY;POINTER TO SOFT 2 Se Lay RES 
650004 73: Ho Be )+.38 "PRESTORE VECTORS 
RRRAD V o 
AST ae4 i318 RIFLES ‘S, A" pat BEEN PERFORMED 
SN — -- 
002422 o0cos2 Mp BSENDAD, De42 ACT-I1 AUTOMATIC MODE, DON'T TYPE ID 
FO 20F ai 
ee xs iat Ue | DATE GPE 
(3 Us: Ph th 
76734 0012 Mov Fars STORE. STARTING Sur TOMES 
4 Te O01e36 Tey is, : $ is fe ape ING IN ATO MONE? 
; 0 wn : 
091236 ‘ aa £8 RTSW STF YES, CLEAR SWITCHES 
60680: 01236 gi 852.00, STRTSH iE sH00=1, quest TONS ARE ASKED. 
001236 $78 STRTSH :B17 a = 
00130 Fst pHa TY :BRE aN} ANY DEVICES SELECT 
N é 
007300 TYPE, NOACT NO Oo Evite SELECTED. 
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NITIALIZATION AND START UP. 




















1119 002312 900009 HALT ;STOP THE SHOW 
ee be a, eae ae :D3SQUAL IF ag ghTaMME SuITCH 
lel ‘ = ve re rd O10 0 r vw C : ’ 2 
113e aria paso? berss 168: 1578 int + aga iEaRet TINE? 
HE BES FEY ons fs Eiht, HE Ed swe eemonrers cow viet ne 
Tiss O0s334 10043) ers ‘ ‘ apie 
1136 Soe33e Szer3 000008 001836 gi aG1TLIEIT2, salir 3° TEST NO, OB LOCK SELECTED 
Tis S0534e 550424 3R i$ BF YES 00 NOT Yo yBe satus 
1128 902350 905137 901324 218: COM —INIFLG :SET FLAG 
1230 958359 104452 906150 243: TYPE =, XHEAD ; TYPE HEADER 
113] 902350 912704 001500 MOV BOM. MAP RY SET POINTER 
lize 032364 O10437 O0124¢ Ss: MOV. RY, TEMPS ET ADDRESS 
free DeeESS BaTuy SOMSSS eae eased} Sone, IF ZERO 
1135 Ode37e 01843? go1ese MOVs (R4)#,TEMP2. «= $SET STA 
i336 D0e40e Bt 437 sgiss MOV (RY) +, TEMPS ;SET BBE 
ft35 Deeuhe BiSus> SoiSee MOV (RH)e. TEMPS = g SET Stara , 
1138 O0e412 104410 CONVERT :TYPE OUT STATUS MAP 
13S 302419 57274 XSTATO ; 
1145 O6e416 900762 BR c§ 
114; Ode4e0 518700 001800 18: MOV —- 80M. MAP, RO sRO POINTS TO STATUS TAGLE 
1343 Shp? 8) a eepgioerys parser pesca 
iis4 7 AU 
Iiss ire] THIS TEST VERIFYS THAT THE ONCLIS AND/OR KNCLIS ARE AT THE CORRECT FLOATING 
1146 TeQDORESSES FOR YOUR SYSTEM. IF THIS TeST FAILS, IT IS NOT A HPROWARE ERROR, 
Lis? S:#CHECK THE ROORESSES OF ALL FLOATING DEVICES (BJ, OH,09,0U,0UP, 2k, OMC,OZ, KC). 
1348 r]#IF THERE ARE NO OTHER FLOATING DEVICES BEFORE THE Sucii. THE FIAST 
1145 {]#OMC11 ADDRESS 1S 760070, KMC1i IS 76010. NO DEVICE SHOULD EVER Se AT 
180 17 OURESS 765000. 
1353 5 SSPSRESRARESSAESERALSSSASLSSESSEAEAARFLSA FHA SALA SAREAAeAA LAAT A SALAS 
| TIES poeuey 013746 900004 MOV = gs" = (SP) ;SAVE LOC 4 
| i155 SOesso Dire 900206 MOV = ga” = SP) :SAVE LOC 6 
| 1355 OoeH35 005037 900006 CLR 86 :CLEAR VEC+2 
| HEE Reese gece? Soiese ck ENP ELERR FLAG ws 
' sent wwe Veluwe 4 SUSUMT. a ee 
| itis 302646 011037 ooi4os RUSTRT: MOY (RO), DMCSR ;GET NEXT DMC CSR 
| 3159 DOevse 901830 BEG = ALOONE :BR IF DONE 
HED GREE: Deyabe ae BRP KMe 
1166 ScEsee 32765 1po0ea n0c002 er 81715, 2(RO) sEHEEK FOR OME o5R 
oww wwe" ~ v H e vu ‘ 
| ties 08478 S004 as 23 SITS A DMC SO CONTINUE 
tee Seve Gze7e2 10c0cd 900008 1: BT. ABITIS,2(RO) CHECK FOR AMC SR 
| HEL SSEte Gie737 ooetoe coon 28: MOY RNODEV,de4 = GEET UF FOR, TIMEQUT 
| Ties 022612 so1053 3 :BR IF KMC s 
| 3100 Beet Bisibs 000006 MOV eR :RZ 1S COUNT OF DEVICES BEFORE ONC 
{178 SoBeee sTEaas 90001 3§: MON 10,83 2R3 15 COUNT OF DEVI eS _3eF° RE AMC 
| 2173 O0e5e6 Gie7le OCe7e2 48: Mov  sDEVTAR, Re :Re 15 CEVICE TABLE © 
| i174 O02S3e Cle7O1 160010 ‘ MOV #160010,R1 START WITH ADDRESS beet 
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0+ 0 0+ 002 Bs + bs he eh 8 = 0d od + 0 8d oh od Oh 0 ho b= 0 Hh 8 Od 8h os hp ep ee 
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PUT ARIAUIAVIANIANIAUIALIAUIAUIAUIALIALIAUIALIALIAUIALLALIAULANLANAUIAUI ANI AIAN AU ASIASI CN Solel ol ood Do) Boy Boy sey ears ey see erie ee meray oe any at oer ae 


ED 


eee ee ee ee ed et ee ee ee ee 
~J . e 
mw s£ 


“> 


NNNNNNNMeEN OO om 


LOTOPOUTULTUTOTUTUTUITU TUG 0- 6 
2.000 NOU Wore C00 “nN Le ODD 


eee ee ee te ee 


:CHECK ADDRESS IN 
itn fo TIMEOUT, a NEXT ADDRESS 


‘ANY | OEVICES 79 CHECK FOR” 
:BR IF \ 


;OK_ONLY OMC’S ARE LEFT, SET UP FOR TIMEOUT 
; CHECK re AQDRESS 
;D0ES_ IT MATCH 


:BR I 
ger hex C ADDRESS 

:SKIP TO NEXT DMC CSR 

CONTINU 

ON TIRE, INC R2, DEC R3 
cre FLAG IF = 0 TYPE HEADER 
:TyPEOUT SEE OER MESSAGE 
:CONFIGURATION ERROR!!! 


; TYPE OUT ERROR P 
TYPE REST OF HEADER 


-SET FLAG SO IT ONLY GETS TYPED ONCE 
SAVE Ri FOR TYPEOUT 
;TYPE CSR VALUES 


OME oR KMC ? 
3BR IF KMC 


; CONTINUE 
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oo 
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>= 0-+0 +0 ++ 0 +08 <8 +00 +> +> 0-0-0 <0 +p <0 
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MACYLL 27(732) EP-7§ 13:18 PAGE 31 
PROGRAM RITTAL TSA ATION AND START UP. 
202734 EVEN 
o02734 005705 AUDSNE: TST RS 
Sets terse BH 
RRSSHS RTECS Abichs MOV «SOM MAP, RO 
02750 000836 BR AUSTRT 
O8s752 Oles3r o0000s 1g MOV (SP) +, at 
OoS75— O1e637 O00004 MOVs (SP) +" a84 
O0a762 032737 O00010 001236 BIT #503. STRTSW 
Ober7c «801422 80 5 
Od5a772 0446S oo0so7o TYPE MNEW 
002776 30500 CLR Ro 
63000 990000 HALT 
603002 Ger?s? 176174 01212 CMe ISWR, SAVACT 
003019 101404 = BLOS 
503012 104402 oOsT3: TYPE | MERRS 
653916 00009 HAL T 
903020 000776 SR -2 
hOSde2 017737 176154 901306 23 MOV silk onacTY 
993030 913700 601306 MOV acty.R 
603534 900000 HALT 
003036 ot 700 090300 33 MOV #300,R0 
603042 Ole701 600302 MOY 8302, R1 
93 010120 4 MOY Ri. RO) + 
803650 soSse1 CLR (RL) 
OO30Se 22021 CMP iRBis, (Rl)+ 
003054 O22750 001000 EMP #1090:R80 
693069 001372 BNE 43 
sTEST START AND RESTART 
903062 9127 91200 IN: MOV BSTACK, SF 
5 atecoe state fey dae, - (82) 
003072 013746 Oc0004 MOV 384 -(5P) 
75 35200 CLR 
io0 612737 003144 cocoo4 MOY 823, 084 
603106 805037 Ocddos CLR aes 
3112 905720 &$: TST (RO)+ 
03114 022700 15777 CoP #157776, R0 
62120 601374 NE &$ 
GO2ie2 162700 907776 Sus 87776, R0 
003126 610037 601304 75 MOY i. MEMLIM 
992132 012637 990004 MOV (SP), 284 
ssi 6:2637 ocddde MOV ‘Bet, ATT 
03142 600413 BR 
003144 O22s26 | 23: CMP (SPDs, (SP)+ 
003146 i62700 o0Cc. Sus RO’ 
003152 162700 007776 Sug 7376, RO 
oozi5t 622700 920006 CMP #30006, Bo 
O3ié2 001361 BNE 7g 
003164 912700 037400 MOV #37400, RC 
603170 O00756 BR 73 
692172 612737 200340 177776 10$: MOV #340, PS 
0632065 636737 600204 601236 BIT sBIT2, STRTSW 
902206 G0]411 BEG 1$ 








;0MC” 

:BR a ~~ Ook DONE 
‘RESET RO TQ START “OF TABLE 
;60 99 KMC’ 

:RES ore LOC 

RESTORE LOC 4 

SELECT SPECIFIC DEVICES”? 


; TYPE THE MESSAGE. 
: ZERO DATA 


LIGHTS 
;WAIT FOR U yee 13 TQ i157 WHAT DEVICES 


UMBER 
ate o iva i NUMBER. 
igre EVERY 
TART ie TBRoeRaM 


:SHOW THE USER WHAT HE SELECTED. 
;CONTINUE DYNAMIC SWITCHES. 

; PREPAR .. TQ CLEAR THE FLOATING 
;VECTOR AREA. 300-776 

3 START PUTTING “PC+e - HALT” 


ALL 
:8R IF 


Save Loe 6 


fon ® Loc 4 


:ST 

aa |p ye TIME OUT 
TO AUTOSIZE MEMORY 

: CHECK ROORESS IN_RC 


NO 
Say 2K _FOR MONITORS 
iat RE HENORY LIMIT 


7BR IF 
yIF 8K DON’T SAVE 2k 


LOCK OUT 2 TET 
:CHECK FOR LOCK ON TEST 
:BR IF NO LOCK DESIRED. 





? 
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DZDMEA. P12 END OF PASS ROUTINE 































1298 sEND OF PASS 
12393 i TIPE NAME OF TEST 
1300 UPDATE PAS fss COUNT 
130] CK FOR xXIT TO ACT-11 
1358 eT eres EST 
1304 003274 900005 .EOP: RESET - sMAKE THE WORLD CLEAN AGAIN. 
1305 ooser8 2503. 001234 CLR LETERR CLEAR LAST ERROR PC 
l 3 ? : ERROR FLAG 
1332 3c | og a3) , I PASCNT : UPDAT 9u 
1308 Hd33ic O13777 O1e30 175660 MOV PASCNT, ADISPLAY SAT SPLAY PASS SSUNT 
1353 903320 104402 005635 TYPE ,MEPASS TYPE END PASS 
1310 993324 104402 OO05016 TYPE = "MCSRX ITYPE CSR 
1311 603330 104411 903466 CNVAT /XCSR SHOW IT 
1312 003334 104402 Go5024 TYP *MVECX TYPE VECTOR 
1313 603340 104411 O034e4 CNVRT © [XVEC : SHOW 
1315 O03344 104402 O06032 TYPE s MPBESX ;TYPE PQSSES 
1315 903350 104411 903472 CNVRT pass HOW I 
1316. 603354 104402 906043 TYPE ee i TYPE ERRORS 
TI? 903360 104411 003500 CNVRT XERR. 
131e Sos36 13760 S013 2 MOV me bi MeOINTER TO PASS COUNT 
1318 603376 6137 61230 MOV PA K RO. (RO)+ ORE PASS COUNT FOR THIS DMC11 
1320 003374 013720 OOlese MOY ERRCNT. (RO)+ ORE ERROR COUNT FOR THIS DNC11 
1321 993400 O05327 O1314 DEC SAVNUM’ ace fit DEVICES TESTED? 
1322 OO3404 01017 BNE RESTRT NO. 
1323 . 503406 -112737 000377 901327 MOVB #377, QV.FLG i Os li 
1324 003414 013737 001310 601314 MOV OMNUM, SAVNUM RESTOR 
izes Coes Oi70) O000Ne MOV ave, fl HECK FOR ACT “11 OR 
e i 
+355 Goeiss Bet Age BESET ‘Et THE Sghtsue Test iN WORLD 
1328 003432 SENDAD: 
1329 O03432 004711 JSR PC, iRL) 
1330 902434 900240 NOP 
133 90 
133 
1333 NO 
1334 003444 012737 007726 001214 RESTRT: MOV BCYCLE, RETURN 
1335 0034S2 000137 007726 MP CYCLE 
i336 03456 O0000) XxCSR: 1 
1337 503460 606 p02 -BYTE 6,2 
133 003462 901404 OMCSR 
1339 OOS464 0000! XVEC: 1 
1340 OO346E 904 O02 E 4,2 
1341 09347 01374 ____ BMRVEC 
1342 00347 Q1 XPASS: | 
1343 003474 O06 002 ‘BYTE 6.2 
1344 903476 001230 PASCNT 
1345 scree 690001 XERR: 1 
134 0035 Ong n02 ‘BYTE 6,2 
34? 003504 001232 ' ERRCNT 
- ;SCOPE LOOP AND INTERATION HANDLER 


00350&8 004737 007470 .SCOPE: JSR PC, CKSWR ;CKECK FOR SOFT SWR 
003Sie ClO0le MOV RO, (SP) ;SAVE RO ON THE STACK 


0+ 0+ 20 be 
LOU Cul eel evi cules) 
UU 


ofue-Owd 









HO3 
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OZOMEA.P11 GENERAL UTILITIES (TYPEOQUT, ERROR, SCOPE, ETC) 


























1384 003514 O3e777 O4S0000 175460 BIT #B1T14, ISWR $ anor nad THIS TEST"? 

ise? pesesG nate ? TTST: Be° CIF LOCK SW 12] ; THIS LOC =249) 
1356 3524 000437 R Ley . 3 LOCK SWOl=1; THIS LOC =248) 
1357 003526 10S777 1754Se TSTB aTKCSR ;KEYBOA 

1358 903532 100034 BPL 3$ ;BR_IF NO. Fock: HIT KEY TO GOTO NEXT TEST) 
1359 003524 tas 17S446 @10V a TKDBR, RO CLEAR DONE BIT 

1360 903540 O41 BR 


1361 O03542 O3e777 OO4000 175432 1$: BIT en sDELSTE ITERATION? (QUICK PASS) 


1383 Q0035Se 105737 O0l3e7 ° TSTB QV.FLG : HAVE PASSES BEECOMPLETED? 
1364 002556 O0i406 ; BEQ es :BR IF QUICK PA 
1365 003550 305237 001224 INC LPCNT :UPDATE ITERATION COUNTER 
1365 003584 023737 OOlee4 O0le22 CMP LPCNT, ICOUNT 7R E ALL ITERATIONS DONE?? 
1387 003572 101414 BLOS ;BR IF NOT YET 
1368 003574 105037 001325 es: CLRB Epa’ :PREPARE FOR NEW TEST 
1369 003600 905037 O0l2e4 CLR :START ICOUNTER AT 0 
1370 003604 905037 O0ie20 as CLR tock 
1371 003610 Ql2737 000020 O0le2e MOV #20, ICOUNT ;RESET LPERAT LONG 
1372 003616 013737 OO0lel& O0le14 MOV NEXT, RETURN GET N TEST 
1373 003624 011600 3$: MOV (SP) .RO : POP RB Ogee OF THE STACK 
1374 003626 OQeebeb POP2SP :FAKE AN ° 
1375 O03630 013701 001404 MOV oncee Rl :R1 KE ONTAING 7 RASE DMC ADDRESS 
1376 003634 O00177 i753S4 JMP JRETURN G0 DO THE TEST 
1377 pel 001 4¢? SRW: ei 

we tol : 





1382 

1383 003644 004737 007470 .SCOP1: JSR PC, CKSWR sCHECK FOR SOFT, SWR 

1384 003650 O32e777 601005 175324 BIT #5109, SHR TS SWO9=1 (SET) 

isss 002656 001405 BEQ 1$ :6R IF Not SET. 

1386 902660 005737 001220 TST Box 

1387 OO3664 001402 REQ 1$ X 

1388 OO366 O13716 001220 MOV LOCK, (SP) :GOTO THE ADDRESS IN LOCK. 

1385 003672 o00002 1g: RTI :G0 BACK. 

e ~ 

1331 s TELETYPE OUTPUT ROUTINE 

13 

1394 002674 of1osus .TYPE: MOV RS. -(SP) :SAVE 35 ON THE STACK. 

1395 003678 017605 oocod2 MOV a2 ($P) RS :GET ADDRESS OF MESSAGE. 

1396 903702 O62766 099002 oocoD2 ADD 2(SP) :POP OVER ADDRESS. 

1297 092710 005737 007664 4S; TST Hinnitg : SOFT Sik MESSAGE? 

1398 903714 601004 BNE i§ IF YES TYPE IT OUT REGARDLESS OF Swi2 
1299 903715 036777 910000 17525¢ BIT 85W12, ISWR ae ALL PRINT OUT 

1400 903724 OO1o1e2 BNE 33 BR IF NO PRINT OUT UANTED (SW12=1) 
1401 003726 105715 18: TSTB (RS) NUMBER MINUS? (MSB=1 (BIT?) } 
1402 903730 100002 PL 2$ ie PA NUMBER 1S PLUS 

1403 003732 104402 ooss74 YPE MCRLF 

1404 003736 105777 175246 23: TSTB  aTPCSR te geapy? 

1495 603742 1002 BPL 2g FN 

140& 003744 112577 175242 MOVB = (RS)+, JTPOBR BR NT NO AREN 

i407 963750 001357 BNE 4g IF NOT ZERO KEEP BRINTING! 

140@ 903752 012605 2$: MOY (SP)+,RS ‘END OF OUTPUT. RESTORE RS” 

i408 6802764 codo02 RTI G0 HOME 


SS ee - - —_— 
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MACYLL 276732) 
GENERAL 


a Ree 


occo04 004000 
000002 900004 


0073ee 
000007 
175166 
175162 
000200 
000015 
175146 


175136 


005579 


0000C4 


0000 4 ' 


007322 
090015 


000060 
000067 
000060 
0001s 





INSTI: 
.MSG: 


1$: TSTB 


es: TSTB 


. INSTE: 


INSTR2: 


. PARAM: 


PARAM: 


is: CMPB 


#INBUF , RY 


% 
aTKCSR 


JTKOBR, (RY) 
#200, ( 


(RY) 


(R4)+ 18 
INS 


TRE 
aTPCSR 


es 
JTKDOBR, JTPDBR 
R3 


aie RY 


RY (3p) 
4 


sRESTORE RY 
RESTORE R3 





DIDOME _MACYLI 
OZOMER. Pil 


ee oo4210 


4480 =O04e42 


1484 go4e44 


1495 004300 


1591 004302 


1505 004310 


0 b+ 02 0 0 he he 
ear esrealeal cal earealealealeal ia! 
TUTU 0-0 b= 0 0 
-OwWM NOUNS Wore 

|] 

oO 

ms 

é 


271732) 22-SEP-75 13:18 PACE 36 
GENERAL UTILITIES <TYPEQUT, ERROR, SCOPE, ETC) 
206305 ASL RS 
006305 ASL RS 
000760 BR $ 
304404 PARERR: INSTER 
860750 R PARAM! 
: TEST TO SEE IF NUMBER IS WITHIN LIMITS 
920537 o04274 LIMITS: CMP RS, HILIM 
013° BHI PARERR 
520537 o04272 CMP RS,LOLIM 
103770 BLO. PARERR 
133705 904300 BITB LOBITS,RS 
001365 BNE PARERR 
:STORE NUMBER AT SPECIFIED ADDRESS 
013704 o04276 MOV pevApR RY 
019524 1$: MOV (Ra) + 
06270S 900002 ADD Re be 
105337 00430! DECB ABRCNT 
001372 NE 1§ 
012504 MOV (SP)+,R4 
012605 MOV (SP)+°RS5 
o05902 RTI 
900099 LOLIM: 0 
909900 HILIM: 0 
009998 DEVADR: 0 
pococa LOBITS: 0 
904301 ADRCNTSLOBITS+! 
sSAVE PC OF TEST THAT FAILED AND RO-RS 
016827 009004 001276 .SAVOS: MOV 4(SP), SAVPC sSAVE R7 (PC) 
;SAVE RO-RS 
910537 001272 SVOS: MOV RS, SAVRS ;SAVE RS 
910437 001270 MOV RY; SAVRY SAVE RY 
010337 O01266 MOV R3;SAVR3 :SAVE R3 
910237 001264 MOV R2;SAVRE SAVE Re 
019137 OOleb2 MOV 1 SavRi :SAVE RI 
010037 ooice6 MOV RO; SavRO :SAVE RO 
ooodde RTI : LEAVE. 
RESTORE RO-RS 
013700 001260 .RESOS: MOV SAVRO, RO sRESTORE RO 
013701 O0le6e MOV SAVRI:R1 RESTORE R1 
013702 O01264 MOV SAVRe. Re :RESTORE R2 
013703 O01266 MOV SAVRS,R3 ;RESTORE R3 
013704 001270 MOV SavR4' RY RESTORE RY 
013705 001272 MOY SAVRS. RS s RESTORE RS 
000002 LEAVE 
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004274 
004499 


004616 
004620 


271732) 


GENERAL 


104402 


CO4621 


o0Ss’4 


000012 


2 
000003 
177400 

e 


007364 


177770 
o0c0&0 


007426 
004620 
004621 
aovee 


007426 
004616 


000012 


004520 
004622 


37 
OR, SCOPE, ETC) 


. CONVR: 
.CNVRT: 


1$: 


es: 


3$: 


4$: 


S$: 


6S: 


WRDCNT: 


CHRCNT: 
SPACNT=CHRCNT+1 


;CONVERT OCTAL NUMBER TO ASCII AND OUTPUT TO TELEPRINTER 


KO3 


#177400 
BI 


INWRD, R4 
CHRCNT.RS 


#TEMP RO 


4 
#177770,R3 
060,R3 


8 
R3, (RO)+ 
RY 
RY 


RY 
RS 


3$ 
#MDATA,R3 
2M (R3)+ 


-(R 
CHRCNT 
45 
SPACNT 
5g 
#O4O 
SPACN 


Pp 
P)+,R1 
P)+,RO 


(R3)+ 
T 
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27(732) 
GENERAL 


000000 


011646 
6 


000136 


004737 


104402 


22-SEP-76 
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LOS 


UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 
BINWRD: O 


000002 
000000 


177001 
001330 
009000 


007470 
010000 


174312 


0002C7 
020000 


001234 
po teSe 
001325 


oocode 
177001 


001325 
005124 
005574 
005574 
001220 


OO&066 


006143 


174312 


174304 
174266 


; TRAP DISPATCH SERVICE 
s ARGUMENT OF TRAP_IS_EXT 





RACTED 
;AND_USED_AS OFFSET TO OBTAIN POINTER 


:TO SELECTED SUBROUTINE 


.TRPSR: MOV (SP) -(SP) 
SUB ) 
MOV ara), (SP) 
TRPOK: ASL (SP) 
BIC #177001 (SP) 
ADD #. TRPTAS, (SP) 
MOV a(SP), (SP) 
IMP a(SP)+ 
sERROR HANDLER 
-HLT: JSR PC, CKSWR 
BIT #SW12, ISWR 
BEQ 
TSTB aTPCSR 
BPL 
MOVB § #207, 3TPDBR 
XBX: BIT #SW13, ISWR 
BNE H 
CMP (SP) .LSTERR 
BEQ 
MOV (SP) .LSTERR 
CLRB —— ERRFLG 
13: sAVOS 
MOV (SP) RS 
SUB #2,R 
MOV (RS) RY 
ASL RY 
ADD (RS),R4 
ASL RY 
BIC #177001,R4 
ADD #. ERRTAB, RY 
MOV (R4)+, ERRMSG 
MOV (R4)+; DATAHD 
MOV (R4) , DATABP 
TSTB —— ERRFLG 
EQ TYPMSG 
TST DATABP 
BNE TYPDAT 
TYPMSG: TYPE § ,MCRLF 
TYPE MCRLF 
TST COCK 
BEQ 1$ 
TYPE _,MASTEK 
1S: TYPE TST 


TYPE , MERRPC 


;GET PC OF RETURN 
; =PC i P 

: MULTIPLY Me ARG BY 2 

CLEAR UNWANTED BITS 

:POINTER TO "SUBROUTINE ADDRESS 
; SUBROUTINE ADDRESS 

:G0 TO SUBROUTINE 


;CHECK FOR SOFT SWR 
;BELL_ON ERROR? 
i IF NO BELL 


EADY. 
:DON’T WAIT IF_TTY wT READY. 
PUSH A BELL AT THE T 
;DELETE ERROR PRINT a 
R NO PRINT 


F P QUT WANTED. 
; WAS THIS ERFOR FOUND LAST TIME? 


RECORD BEING HERE 
:PREPARE HEADER 

; SAVE ALL PROC Besta TERS 
;GET THE PC OF ERRO 

,GET ADDRESS OF Thee CALL 
sGET HLT Ue + ameachd ind 


; TYPE — 
‘DOES DAT TABLE EXIST? 
:BR IF YES. 


fo IT 
s TYPE PC. 











DZOME 
DZDMEA.P1i 


005052 


08236 


005240 


005250 


005252 


MACY11 271732) 








22-SEP-76 13:18 PAGE 39 
GENERAL UTILITIES (TYPEOUT, ERROR, SCOPE, ETC) 


MO3 


en Sey eer A BOY Flee 
10395 133854 001325 MOV 4-1 RRFLG ave MORE RCAbER UNLESS NO DATA TABLE. 
005737 0095100 - TST RRNEG ‘IS THERE AN ERROR MESSAGE? 
001402 BEQ ARO FM :BR IF NO. 
104402 TYPE : 
oo0000 ERRMSG: 0 : ERROR MESSAGE 
005737 005112 TST DATAHD ‘DATA HEADER? 
901402 BEQ TYPDAT -BR IF N 
104402 TYPE ; 
900900 DATAHD: O DATA HEADER 
095737 oos124 TYPDAT: TST DATABP ‘DATA TABLE? 
001402 BEQ RESREG :8R IF NO. 
104410 CONVRT ; 
090000 DATABP: 2 DATA TABLE 
104407 - RESREG: RESOS :RESTORE PROC REGISTERS 
Gee7 37 003432 oooo42 HALTS: CHP #SENDAD, a442 -IF ACT-11 AUTOMATIC MODE, HALT! 
005777 174036 TST aSWR ;HALT ON ERROR? 
100905 BPL EXITER -BR IF NO HALT ON ERROR 
010046 13: PUSHRO : SAV 
016600 oo0002 MOY 2(SP),RO :SHOW ERROR PC IN DATA LIGHTS 
oco900 ALT sHALT 
012600 FOPRO GET RO 
005237 001232 EXITER: INC ERRCNT sUPOATE. ERROR COUNT 
032777 oOO4O0 174010 BIT #SWO8, ISWR - ‘GOTO TOP OF TEST? 
001007 BNE c VES” 
Ose777 oo2000 174000 BIT #SW10, JSWR ‘GOTO NEXT TEST? 
013727 001218 001214 MOV NEXT, RETURN -SET FOR NEXT TEST 
012706 001250 13: MOV #STACK, SP : T 
000177 173772 ° IMP oRETURN :GOTO SPECIFIED TEST 
oo002 23: RTI RETURN 
090901 ERTABO: 1 
006 oo2 .BYTE 6,2 
001276 SAVPC 
000001 XTSTN: 1 
003 o92 .BYTE 3,2 

001226 TSTNO 

sENTER HERE ON POWER FAILURE 

.PFAIL: 

012737 ooSes2 cooce4 MOV #RESTART, 24 :SET UP FOR POWER UP TRAP 
oo0099 HALT :HALT ON POWER DOWN NORMAL 
000777 

;PROCESSOR WILL TRAP HERE WHEN POWER IS RESTORED 

RESTAR: 

012737 oose40 oocoe4 MOV #.PFAIL, 24 ;SET UP FOR POWER FAILURE 
012706 01200 MOV #STACK. SP ;RESET THE STACK POINTER 
013701 901404 MOV bacee aI T 
005037 007364 CLR P READY FOR TIMMER 








005336 
095340 


OOESEe 
905370. 


po5404 


905406 


0054S2 
oOS4S4 


005530 


DZOM MACYLL 27(732) 
DZDMEA.Pil 


005274 





03 
901226 


Ole777 
104414 
lellil 


104414 


000002 


1$2777 
142777 


-b0000e 


152777 


000002 


013637 


00000e 
000001 


013637 
062746 


104414 


007364 
005577 
00533¢ 
001325 
. 001234 
173662 

02 


009020 


900020 


000iC0 
000300 


o0cd0e 


000199 


000003 
000097 


007364 
000002 
000020 
173706 
000020 
007364 


007364 
000008 


22-SEP-76 |} 
GENERAL UTILITIES TYEE: 


005237 





AGE 49 
UT, ERROR, SCOPE, ETC) 


ROMCLK 
leliil 


ROMCLK 
l2l2e4 


-MSTCLR: 


-ROMCLK: 


1$: BISB 


. DATACLK: 
M 


1S: BISB 


38: -BLKW 1 


. TIMER: 
MOV 
ADD 
1$: 


ROMCLK 


JRETURN 


#20, JDMPO4 


#81T4, JDMPOY 
1$ 


#BITS, JOMCSRH 
#81T6!BIT7, sOMCSR 


#BIT1,2DMCSRH 
a¢SP)t QDMFOb 


(SP) 
tide, aSWR 
Tiler 


a(SP)+,1 TEMP 
tatT4 SONCSRH 
JOMCSR, JDMCSR 
#5174, , JDMCSRH 


1$ 


2(SP)+, TEMP 
#2,-(SP) 


DMCSRH -CLOCK INSTRUCTION 
ITO,aDMCSRH ;CLEAR ROMO, ROMI, STEP 

















—_— 





sPLUS - OPE 19 6 TIMER! 


Flee THe 

LE LAT west TO RETURN TO. 
CLEAR naINt BITS 

START CLEAN UP OF DEVICE 
{START GOING THAT TEST AGAIN. 



















;NEXT WORD IS_ INSTRUCTION, ROMCLK PC=S304 
:POKE CLOCK DELAY BIT 


;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
: PORT4+IBUS#11 

:15 CLOCK BIT SET? 

:BR IF NO 




























-SET MASTER CLEAR 
:CLEAR MASTER CLEAR AND RUN 
ETURN : 





















;SET ROMI 

;LOAD a ht IN SEL6 

;ADJUST STACK 

sHALT IF SWO6 =1 

;BR SWOS =0 

‘HALT BEFORE CLOCKING INSTRUCTION 


jPUT 1c eet IN TEMP 


:BR i@ NOT DONE 
:RETU 


;MOVE COUNT TO TEMP 
ADJUST STACK 


;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 








BO4 


















021364 ;PORTY+IBUS* REGLI 
IT 82, JOMPO4 -1§ PGM CLOCK BIT CLEAR? 
BEd 1$ “AR IF YES 
4 104514 BOMCLK HEX WORD IS INSTRUCTION, FOMCLK PC=6304 
175y G0554— 6031364 92134 BT4+[BUSs 
i752 D055s0 S3277 oo000z 173634 SIT #2, 20MPOS : te Port CLOCK "Sit "SET? 
i753 OSES 001372 BNE 2g BR IF YES 
1754 O05560 908337 o07364 DEC TEMP :DEC COUNT __ 
1755 OOSSS4 O0136: BNE 1$ -BR IF NOT DONE 
175— 008566 600002 RT! : RETURN 
1758 90ss7o 920040 oD0DgT7 MOM: .ASCIZ 4 % 
2) 6855574 005015 600 MORLF: ASCIZ  <15)« 12) 
5) 605577 37> 953620 029122 MEFAIL: [ASCI2 <377)/PWR FAILED. RESTART AT TEST . 
2) 605635 377 47105 O20154 MEPASS: .ASCl2 <377>/END PASS DZDME / 
2) 05657 77 O00le2 ME: ASCIZ «377 /R. 
B: «BOSE oso377 647522 051107 MERR2: .ASCIZ <377>/PROGRAM INDICATES NO DEVICES PRESENT. 
(3) 005731 377 O47111 O52522 MERRS3: ASCIZ «377 INSURE ICTEN? DATA! 
=) «6906758 77 «O42524 062123 MTSTPC: lASCIZ (399) TERT Pee 
2) D575? 377 847514 045503 LOCK: .ASCIZ <377)/LOCK ON SELECTED TEST 
(2) OO601§ 951503 035122 000040 MCSRX: .ASCIZ CSR: 
2) 006525 94252¢ s35103 990040 MVECX pase: VEC: / 
(2) 306532 40520 O81523 O§150§ MPASSX: ASCIZ “PASSES 
, <2) 808083 105 OSliee 083117 RRX: :ASCIZ /ERRORS: 
«CED BO8054 42824 052123 947040 MTSTN: <ASCI2 /TEST NO: 
2) O08066 Oo0052 MASTEK: .QSC0I2 “#7 
| (2) 856070 O5177? ose105 gs1a30 MNEW: ARCH grr SET SWITCH REG TO DMC1L°S DESIRED ACTIVE. 
| (3) 5d6143 120 635103 000040 MERRPC: LASCIZ 
2) 506150 oece:2 20040 20040 XHEAD: .ASCIT BIB MAP OF OMCL! STATUS 
| (8) 062007 377 9259040 020040 i \-0h 6 a 1k ee ne 
| (2) BOERE 20812 085040 d23103 “ASETI BIB) PC cse STAT! STAT2 STAT 
2) «30320 «026777 o264ss 026455 W\1 Pa eh ee , 
| (2) 856374 944377 053517 46440 NUM "Beet C37) 7HOW MANY DMCI.'S 70 BE TESTED?” 
| CB) BBe534 041777 «O81123  O4o44d CSR "ASCI2 <3779/CSR ADORE 
| <E) B3e452 053377 O41505 47524 c "ASCIS 377) /VECTOR ACDRESS?/ 
| (eB) BOee73 77 «6051102 Osod4e PRIQ:§ <ASCIZ <377)/GR PRIORITY LEVEL” (4.5,8,2)7, 
| (E> 836532 ows?77 620106 O46505 CRAM: § :ASCIZ <377>/TF DMC WAS CRAM (Mg204) "TYPE “y=. IF CROM (™g200) TYPE “N= 
| 2) 888630 Os3777 Ou4sio Sy4io MODU:  ASCle <377>/WHIC UNIT? IF NONE TYPE “NA, IF M201 TYPE "i", IF M+. 
| (Bi §oe742 O51777 Ouyse7 041504 _ LINE: . 1ASCI2 <377)/Si Fou Pace] (DOCMP LINE 8)? 
| ° (By) BOro0g 651777 O4y5e7 041524 5M: -ASEIZ (377) /SUTCH Pace, (BMS73 Soot 509: °, 
«CE 862855 384777 920123 O44124 CONN: — -ASCIZ  <377>/15 THE LOOP BACK CONNECTOR ON? 
2) 807108 fs0377 O475ee 051197 Noact: Asc? (397 Bi OGRE Pot aaFES” NO BEVICES ARE SELECTED 
| (2) 087153 377 081412 051127 SWMES: :ASCIZ <377 «1297 ‘SuR= 
8) 907} 116 352505 620077 SWMESI: .ASCIZ “NEW? 
| ¢tB) 86717} 377 042377 OS1515 FONERRL TASETS CPP C377 -DMCLI CONE IG SURATION ERROR PC: 
| 63) 687593 377 Acuing §=A45E56 CNERR: .ASCTS (37> / “PECTED FOUND 
| (2) B67254 pewduo 846654 624603 BMEM: lAScI2 7 (DMC) 
| 42) BB7eb4 SEaO4G OMEEL2 De4503 nen "ABCID 7 (KME) 
2) Cve: 
“B) 07874 po000s XSTATO: S 
1753 55757 606 003 “BYTE 6,3 
17246 07300 o01246 TEMP! 
1761 857302 ne 903 6,3 
| $768 667304 o01269 TEMPS 
ives 60735¢ 65e 003 BY 6,2 








OLDME «MACYIL 27.732) 22-SEP-7S 13:19 PAGE 4 
OTOMER.PLL GENERAL UTILITIES <TYPEOUT, aRCR, SCOPE, ETC) - 
17S4 O07T310 001252 TEMPS 
175 OO7312e 00 00 BYTE 6,3 
tre OO7314 O01esY j= ae 
See SESSEE porte sens SF 
1783 EVEN 
iizi ;BUFFERS FOR INPUT-OUTPUT 
1773 007322 990900 INBUF: 0 
1355 55535 12. $40 
1775 oo73ss4 300950 TEMP: 0 
i778 557526 62.440 
i7re oc7e2e 900000 MDATA: 0 
i773 SEFS55 .2.+40 
red 
i781 ROUTINE USED TO_CHANGE SOFTWARE SWITCH 
178¢ TREGISTER USING THE CONSOLE TERMINAL 
1785 
1785 OOTH7G O22737 O00176 cO1202 CKSWR: CM BSWREG, SHR 15 THE SOFT SHR BEING USED” 
178& OOT47& 00107) 8N CKSHE 
1787 507500 82277? oo0007 171500 cM $7,aTKOBR «=; WAS STRL G TYPED? (7 SIT ACID) 
| i788 OO7E0E O01404 | F YES. 
1783 507510 Oea777 ocdecT 171470 cMP 0s #207, TKDBR SHAS CTRL G TYPED? (8 BIT ASCII) 
1730 857516 001061 BNE = CKSWAS :BR IF NC 
17S 557820 TdSsé 1s MOV sR, - (SF) :STORE F- 
i732 B07S22 10346 MOV R3,-( 52) :ST2KE BS 
| 173° O67524 Gidsee Moy RA “(SP sar ORE AY 
1735 G5753s O1ita? vr777 ores MOV a-!,SMFLG :SET SOFT TYPE out 
| i795 557534 o06002 CKSWRL: CLR 2 : EEEAR Neu Su CONTENTS 
| 1796 007536 o2 708 Heres MOV a-1,R4 Fie FLAG TQ. AL L ONES 
| 178? G67852 fO64d2 607153 TYPE =, SWHES a 
| 178s OO7S4E lOMsll CKSWRE: CNVRT ;TYPE OUT PRESENT CONTENTS 
| 1799 Oo7550 O97720 SOF TSW iar Sort "sure CH REGISTER 
| $800 DOPSES 154408 o7163 SKSWR2: TYPE = SWMESL_ ;TYPE “NEW? 
1801 OO7558 O04737 007656 SWRY: JSR PC INCHAR . :GET RESPONSE 
| 1852 9752 922702 o00015 CMP 915,83 ues IT A CR? 
| 1853 S67EE 231425 SEQ 3°. : YES 
| %2DS 007570 932702 ooo02 CMP 812, R83 iiss IT ALF? 
| $805 07574 Sor416 Beg (48 :3R_ IF YES 
, 185— B5757¢ 922703 ocoooes CMP 2S, RD :WAS IT CTRL_U? 
«180? Oo7eoe 001754 B&g = CKSHRL :BR if YES(E START OVER) 
1856 507604 022753 000007 CMP 72 IF CNTL G GET NEXT CHAR 
1698 007610 O0i7 BE9 CKSWRS 
| %8I6 So7e12 O05004 CLR - :17 MUST BE_8 DIGIT $0 CLP FLAG 
| 2812 B076i4 42703 177770 Bio 8177770, R3 sg OoT BRE MASK OFF BITS 
| yee 80 A :SHIFT R2 3 TIMES 
«TEE BEDRES RRRERS asl sé 
ER B57624 006308 ae prez? 
| rei BeoesS DeePES Ba a SSE? REXt SHSAACTER , 
| $81? B67e32 O12766 cozooe 0000 48: Moy aw START.E(SP) LF WAS TYP 0 50 GO TO START 
| TEie GSvess 60579 c$: TST = sR :15 FLAG CLEAR” : 
| TIS fd7e42 bOiooe BNE sé S SHE NOT DON'T CHANGE SOFT SKA 





om 


C0 6-0 + C jo 
if 


epCetestesCestentey 
MOoOctICS 


DINU 
—(9.0W) IOUS Gotie-Cs 


+020 +0 <p <b ppp e 


LT ealesTeelesiislesleslisleslesiaali 
CobNnutotulr 


fu 


“0 +0 0-6 


IGIOCIGIGIGI) 


ed eee ed 
intod 
I tot. 


CROM" ION £9 


a ee ee ee oe 


AGE 43 
ERROR, SCOPE, <TC) 


&$: cL8 
CKSWRS: RTS pe 


INCHAR: TSTB aTKCSR 
MOV JTKDBR,R3 

TSTE aTECSR 
MOV R32. JTPOBR 


SiC weit? 83 


t . 


ee ee Oe ee 6 oe 





S TO SOFT SWR 


TE NEW CONTEN 





DSOME _MACY11 
, 


DCDOMER. Pl 


1841 

ss 

i. 

iB 

184s 

Iga? 

iss 

1843 

18S0 O0772 
1851 07732 
18S2 907734 
l8S3 007740 
18S4 007742 
1sSS 007744 
igss& OO0774E 
18S? OO775Se 
i8S8 9077 
1859 097764 
18689 O0777e 
1861 010000 
les2 01000e 
1863 910010 
1864 Q1C0is 
1865 019024 
1866 bid0eb 
1887? 010032 
1868 010036 
1869 91004e 
le70 Q100% 
1871 010054 
1872 910060 
1873 Q10064 
1874 010070 
1875 910074 
1876 919190 
1877 O19i0% 
i878 O0i0lle 
1873 O1011& 
1880 910224 
3882 015130 
186e 910136 
1B63 010142 
1884 010150 
1885 

1g 010154 
1687 Ol0lse 
1888 QOi0166 
Bee Ate 74 
1B30 030200 
1891 010206 
am 
163 Bin5e5 
1835 010222 
1836 Ologze 


SENERAL 


SEeSeeeeacE SS 
o— 0 bb bo oe 


ita 
a 
INN 


ao Oooowo 
Ries RRR Oe 
GIG) 
“J 


1 
— 
Ww 
INO 
ILD 
NN 


Bra737 


Re5Ca> 


032737 
001450 


005737 


001306 
007160 


000002 


000042 


CO1406 
001419 
cO14ie2 
001414 


001376 
001400 
001402 


001236 


8 PA 
0 


CYCLE: 


18: 
a2. 


es: 


4$; 


GE 4 
UT, ERROR, SCOPE, ETC) 








:ROUTINE USED TO “CYCLE” THROUGH UP TO 16 0 


i NES ~ iN f able ete a APO FESR Foe Tse, rarest te 


:BE RUN FIRST BEFORE ENTERING THE DIAGNOSTI® FOR THE 
SETUP NECESSARY. 


te : ARE 1 als TO BE TESTED? 
»NOACT NO ‘att Y S SELECTED!! 
STOP THE SHOW. 
a :DISQUAL FY CONT. SW. 
:CLEAR PROC. CARRY BIT. 
RUN ;UPDATE POINTER 
RUN CATCH CARRY FROM RUN 
#4 MILK ;UPDATE POINTE 


#10, CREAM 
SON! MAB+200, CREA At 


#0M. MAP, CREAM 
SCNT.MG. MILK 
RUN, OMACTV 


CREAM, RO 


thE) + PeESNT 
SStSR, DNCERH 
MCSRH 
pakare, ,OMCTL 
OMCTL 
DMC Me OMPO4 


RO. DMPO4 
Raeou DMPO 
RO, DMPOS 


ty ae 


Rate. Fr 
RO, OMTL 


8SWO1, STRTSW 
7$ 


aes2 


sRUNNING IN AUTO MODE? 





:UPDATE ADDRESS POINTER. 


:KEEP GOING; NOT aL TESTED FOR. 
:RESET ADDRESS P 

rRESE | PASS cay POENTER 

:I§ THIS ONE ACTIVE? 


F_NO 
:GET ADDRESS POINTER 
;GET PASS COUNT POINTER 
:LOAD sy$! TEM CTRL. REG 


LOAD VECT 
: CLEAR UNURNTED BITS 


: SAVE CORE THIS WAY! 


sPTY LVL 
:TX VEC 
TX LVL 


rf } ae SELECTED 








ee a 








DDDME MACYLI 2? 
DIOMEA.P 11 
189? 010226 
1838 910230 
1833 1234 
1399 ies 5 
1301 910540 
1902 o10=242 
1893 919544 
1304 Q1fe4§ 
ss 4UESU 
1608 91051 
180? 010252 
1898 910356 
13803 010360 
iid o1dz62 
i811 010264 
i813 010272 
1$13 9195275 
is1% 810392 
1815 010304 
i$ig O10310 
$i? 910319 
18ig 01532¢ 
1$:§ 010324 
1930 310326 
1921 919332 
1922 515334 
1923 010340 
1324 
1$25 010342 
1926 010350 
$27 015354 
1$2g 
1929 
1930 
1931 
193¢ 
1933 
1634 
1$35 
1$3€ 
3937 
1938 10360 
1929 010360 
1946 010362 
194i S10366 
1942 910370 
1943 910374 
| 1944 910376 
1s45 910402 
| 1946 O1040¢E 
| $4? O1oule 
| 1848 01048 
| 1849 O1ove 
1$60 Sld4e¢ 
1s51 610434 
1$62 O1043 






(732) 


GENERAL 


ae 


anova 
012737 


013701 
000177 


006374 






005874 


012074 


001l2e6 
001226 


091500 
001700 






22-SEP-76 
UTILITIES WBE Sur, 


13:1 


000002 
000904 


001236 


001214 


001236 


001256 











8$: 


8¢: 


PAGE 4S 
ERROR, SCOPE. ETC) 







FO4 


7$ 
»MCRLF 


#TST1,RO 
(PC)+, (RO) 
(PE)? RPC I+ 
6s 
TSTNO,2(RO) 
STSTNO,4(RO) 
Ro RETURN 
BSKO1, STRTSH 


(RO)+ 
tania 


MOM 
4g 


#7ST1, RETURN 
DMCSR.R] 
ORET AN. 


:SR IF YES 
;GET TEST NO. 


;CMP FIRST WORD TO 12737 


;OR_ IF NOT SAME 
;DOES TSTNO MATCH? 


N 
TS LAST WORD OK? 
:8R IF NO 
;IT IS A LEGAL TEST SO DO IT 


POP _RQ 
at ag YET? 


NO 
YES TLLEGAL TEST NO. 
; TRY AGAIN 
— RETURN ADDRESS 


= BASE _OMCi1 ree 
a START TESTING 


i ROUTINE sane “AUTO SIZE” THE DMC11° 


AUTO. SIZE: 


CSRIMAP: 
1$: 





hm CSR MAY SE ANY WHERE Eudnn | THE FLOATING 


DRESS RANGE CASO: 


AND THE VECTOR 


MAY BE ANY WHERE IN THE 


FLOATING VECTOR RANGE (300:770) 


80M. MAP, Re 
(R2)+ 
aD, END, Re 
1$ 


OMNUM 

SON oe gr 
DMACTV 

7 YSTRTSH 


7$ 
#1, TEMPS 





stb na 5 BhF when 


NO 
SET OCTAL NUMBER OF DMCLI’S 
:R2 POINTS TO OMC MAP 
CLEAR ACTIVE 

QUEST IONS? 


F YES 
TF NO ot BESTIONS 
:START WITH 








00 





MACY 11 
MEQ.PLL 


019440 


mn 
zn 


OOOO OGOOVOAVOWIVOOOVO1OOD BOIOOVOOVOVIIIIAIVIOOVIVOVOOVOVOAIOVOVOBVO0O0 ONO 
Q00d 

™“ 

o 


0 0 <= + 8 bb b= 2 0 0 B+ 2 0 2 2 bo 2 2 bs 2 2 9 0 bo bo 9 he bs ho be ps 92 bo 2 bo be ob pe ee 
au a 
-o 
oO 


titaitotatatututatatatatat atta 
£ tw JTUTU OD = 
ENOERS POS Core 


uru 
” IO 


27 (732) 


GENERAL 


104405 


008763 


001254 
O1204e 
000924 
occ0e? 
009011 


170777 


012042 
000131 


000116 


PAGE 46 
UT, ERROR, SCOPE, ETC) 
PARAM 
1 


TEMP3 
MCRLF 


TEMPS 


t 
TEMP4, (R2)+ 


i 
TEMPY, (Re) 


PC, INTTY 
824,83 


74 
#170777,R3 
R3, (R2) 


10$ 
PC INTTY 
#131,R3 
Bl1E,R3 
163 


8g 


OMNUM 


;D0ES DMC 
;GET REPLY 


ves 
“NOT AY OR N 





;DMNUM = HOW MANY 


; TYPE WHICH DMC IS BEING DONE 
;TEMPS IS WHICH DMC 


;STORE CSR IN MAP 


;STORE VECTOR IN MAP 


;ASK WHAT BR LEVEL 
;GET RESPONSE 


:BR IF LESS THAN 4 


R IF GREATER THAN 7 
3R4_ = NUMBER OF SHIFTS 
;SHIFT R3 LEFT 

3 DEC HIFT COUNT 

;BR IF NOT DONE 

;BIC UNWANTED BITS 

PUT BR evel, r 


ONTINU 


;RESPONSE IS OUT OF LIMITS 
; TRY AGAIN 


ASK AGAIN 


HAVE CRAM? 











D2OME _MACYLL 271732) 
DZOMEA. PL) GENERAL 
2009 o10s46 os2712 
2010 Oloss2 104402 
2011 O15654 606636 
S012 010856 O04737 
ai HEE Be 
2015 bt BESe 703 
2016 O10874 901412 
2017 910676 022703 
2018 910702 901403 
2019 010704 104402 
2020 010796 305570 
2021 010710 000760 
S0ee 10712 ose72e 
023 O1071§ Ode2222 
2024 010720 9004497 
2025 O10722 oS2712 
2026 010726 10440e 
2027 010730 007040 
2928 10732 004737 
2028 010736 022703 
2030 O1O742 901408 
2031 10744 022703 
2023 O10750 O01406 
2033 O19752 1O44d2 
2024 910754 Ooss7 
2035 010756 o00763 
2035 O10760 52722 
2027 O10764 Oo0040e 
2038 O10768 O4e7e22 

2933 01077 
2949 019772 104403 
2041 010774 006742 
2042 010776 104405 
2943 911900 Ooo000 
O44 011002 900377 
204s 011904 OO12s4 
2046 011006 00 
2047 011007 001 
2048 9811910 113722 
2049 611014 104403 
2050 011016 007000 
2051 O11020 104405 
2052 011022 do0000 
2053 911024 000377 
2054 011026 o01254 
2055 911030 900 
S056 11031 001 
2057 011032 113722 
2058 011036 o05722 
2059 611040 005337 
2060 O11944 001205 
2061 911036 000137 
S062 O110s2 612701 
2063 O11056 612737 
2064 611064 G05011 


L 





2e-SEP-75 
UTILITIES (T 


100000 
012042 
000021 
ocodee 
000116 


010006 
020609 


012042 
90013! 


000116 


640000 
040000 


001254 


001254 
O0ie25e 
011456 
10000 
011550 900004 





ROR, 


98: 
1$: 


Wu 
Or 
mw 


333: 


7$: 
es: 


SCOPE, ETC) 


BIC 


L 
PARAM 


HO4 


#BIT1S, (Re) 
PC INTTY 
21,3 

303 

g22,R3 

31$ 
#116,R3 
32e$ 


sett l2, (R2)+ 
(R2)+, (R2)+ 
IT 


#BIT13, (Re) 


PC wey 
#1213 
#116,R3 
18s 


30$ 
ee 
@BIT14, (R2)+ 


0 
1 
TEMP4, (R2)+ 


0 

1 

TEMPY, (R2)+ 
(R2)+ 

TEMP3 

12$ 

13$ 
#160000,R1 


863,084 
(RL) 


;SET BIT 15 IF CRAM 
:ASK WHICH LINE UNIT 
T REPLY 


;1F NOT A i,2 OR N TYPE "7 


;TRY AGIAN 


BIT 12 IN STAT2 IF_NO LU 


:SET 
POP OVER STAT2 AND STAT2 


;SET BIT 13 IN STAT2 IF M8202 


;ASK IF LOOP-BACK IS ON 
igeT REPLY 


3N 


;IF NOT Y OR N TYPE “?” 
:TRY AGAIN 

TURNAROUND IS CONNECTED 
;NO TURNAROUND 


;STORE SWITCH PAC IN MAP 


;STORE SWITCH PAC IN MAP 
:POP OVER ST ats 

:DEC_OMC COUN 

BR IF MORE 10 DO 


: CONTINUE 
:SET FOR FIRST ADDRESS TO BE Weare 
:SET FOR NON-EXISTANT DEVIC 


:CLEAR SELO 








DIOME ele 27 (732) 
GEN 


DZDMEA.P ERAL 
2065 Q11066 905711 
B0s— O11070 01162 
e0e’ Q1107e 005061 
2058 011076 005761 
e0S3 91110e 001155 
2070 O11104 Ole7il 
2071 911110 005061 
2072 O11114 Ole7ei 
2073 Olilee O$2711 
2074 Ollleé Oee7bi 
2075 011134 001004 
e cg 011136 $2762 
e078 O1li4s Ol2711 
20793 beta pisch 4 
2080 011160 Qle711 
2081 Q11164 Ol2711 
e082 011170 See76l 
2083 011176 001404 
2084 911200 Q22761 
2085 011206 001113 
2086 
2087 011210 O10122 
5088 liste Olevii 
£089 Qllels 005061 
5080 Olieee Ole7el 
203i 011230 OS2711 
2092 O11234 012761 
2093 Olie42 O0S2711 
2034 O1124%6 122761 
2095 O1lesy 001003 
2095 Q11256 0527le 
2097 Oll262 000436 
2098 011264 032761 
2099S QOlle72 001403 
2198 Qile74 OS27le 
2101 011300 O004e7 
2102 Q11302 932761 
2103 011210 001023 
2104 Qll3ie 012761 
2105 011320 912761 
5106 011326 052711 
2107 Oli3se Ole7el 
2198 011340 C5271! 
2£i09 Q11344 032761 
2110 011352 001402 
elll 911354 OS271e 
elle 011360 0057ee 
ell3 O1136e O12761 
2114 Q11370 Ol271i 
ells Bt ieed St 122 
ells O11400 Ql2761 
2117 O11406 Ole711 
e118 OQOll4ie 156le2 
S119 Olisie 008722 
2le0 011420 005011 


000006 
000006 


002000 


leSeSe2 
100900 
001000 
10946 
Ansan 
Be See5 


177777 


091009 


000377 
010000 
noooo2 
060000 
po0010 
o00100 


Bo0c10 
040000 
O51 364 


000004 


o00006 
000094 
000002 


000006 


000096 
co0006 


oocode 
000006 
ooc0d4 


000904 


000004 


ooocc4 
O0o0Sé 


000006 


000004 - 


000005 


000006 


3 


2 





104 


PAGE 48 
UT, ERROR, SCOPE, ETC) 


TST (R1) sIF OMC11 DMCSR SB O 
BNE 33 iF NO DEV ; TRAP TO 4. IF NO BIT 8 THEN NO 
CLR B(RL) ‘CLEAR SEL 
TST S(R1) LIF NCIS THEN DMRIC S/B =0! 
BNE 3$ ‘BR If T DMC1I 
MOY #BIT1O, (RL) : SET 
CLR 4(RI1 : CLEAR Reel 
MOV nlctese G(R1)  ; WRITE THIS TO SEL6 
BIS 3, {R1) :WRITE IT! 
CMP ve repes. 4(RL) WAS IT WRITTEN? 
BNE 21$ -IF NO IT IS NOT CRAM 
B:S #81T15,2(R2) -SET BITIS IF CRAM 
5R 22$ 
1$: MOV #8IT9, (R1) :SET ROMI 
MOV #100400, 6(R1 


a CTI £ 
MOV wBITS!StTS, (R1) CLOCK INSTRUC 0 PROC PC TO Q) 


T 
CMP #63220'5(R1) IS IT CROM 
BEQ 22 :BR IF YES 
cp #-1,6(R1) sIE = oh aT Has NO CROM 
“AT THIS “ONT 1T Is RESUMED THAT R1 HOLDS A Se1 cS ADDRESS. 
223: R1. (R2)+ ORE CSR IN CORE TABLE. 
1S: NOY seITS, (RL) ;CLEAR LINE UNIT LOOP 
4c EAR PO Fy" 
MOV #123113 S(R}) OAD NST RUCTION (CLR DTR) 


1) 
i IN 
BIS #8178, (R1) :CLOCK INSTR 
MOV #021264,6(R1)  :LOAD IN FRUCTT 
BIS #B8ITS, (R1) ;CLOCK INSTRUCTION 
CMPB 8377, 4(R1) :IS IT ALL ONES? 
BNE +10" :BR IF NO 
gis wt 12, (R2) ?IF YES, NO LINE UNIT, SET STATUS BIT 
BIT #BITL,4(R1) :IS SWITCH A ONE? 
BEQ St IF M8201 
BIS #BITISIBITIY, (RES nsec RSSUNE CONNECTOR 
BR ; CONNECTOR ON) 
BIT #8IT3,4(R1) 315 MOY SE . 
BNE BR IF mge0 NO CONNECTOR (ON LINED 
MOV #BIT6, 4<RL) LOAD PORT 
MOV #122113, 6(R1) sLORD INSTRU CTION 
BIS #8IT8, (R1) LOCK INSTRUCTION( SET DTR) 
MOV #021264 bien) ‘bab INSTRUCTION 
BIS #BITS, (R1) s CLOCK INSTRUCTION(READ MODEM REG) 
BIT #81T3/4(R1) ish NO? 
BEQ 0 2 oF NO EON NECTOR 
BIS G1T14, (R2) SET STATUS BIT FOR CONNECTOR 
208: TST (Re)+ :POP POINTER 
MOY 8021324,6(R1)  ;PUT INSTRUCTION IN PORTS 
MOV wBITS! BITS, (RL) PORTS +LU 15 
BISB 4(R1). (Reds :STORE DOCMP LINE # IN TABLE 
OV #021344. E(R1) PORTE INSTRUCTION 
MOV #8IT8!B1T9, (RL) s LOCK INSTR 
BISB 4(R1). (Reds :STORE M873. ange IN TABLE 
TST (R2)+ :POP OVER STAT3 


CLR (R1) CLEAR ROM! 


OMC1 









OZOME 
DZOMEA. 


011422 


££ OOO™IC' ULE Lofue- 
Oo 
~ 
- - 
ss £ 
~g uw 
io 4 


5S4 


ob pps — b+ p= b= bs 6 = bo 9 pe ps b= po fo po pe 
oat pat b+ b= b= b= b= 9+ p< 2 ps 9 pe pe 


CUTOUT ee ee WWW WIG) IW) Woruturururofon 
he testi tr Wate itetepr ty pet atta) fururorory i 


SNNNNOOOMO MOO MMO mui 
£0 OWD NOU WIM O.00 SIMUL 


a 


0 + 0 8 = 02 = bb 0 8 0 0 0 0 0 + 2 0 2 2 bs 2 2 00 82 Bs 2 bs 2 bs he 2 bo bo be be hs he = me ho he pe 
“3 
oe 


ruruvrurorurururorurururoruruorurufororururorrurororunrururorurnmrrurrrrrururoruronrurororonrorrrorre ts 


NOOOOOVOOVOVVOVOVOVOOOOVOVOOOVOON O00 DOOVOVOVOOVVOOOCOOOOV0HO 
— 


0b Os 8 b= ee 0 0 oo 
2 0s 2 eb 
roo eal 
es 
oOo 





MACYLL 2 
Pil 


7(732) 
GENERAL 


pore, 


090082 
000001 
001386 
Riri ta 








001310 
000020 


bosees 
O11444 


Ce 


00091 
000340 


00 

003302 
oo0cs4 
001000 
001306 


Cot 246 


e70012 
Gie2dse 


000200 
091000 
lellil 
001400 


22-SEP-76 PAGE 49 
UTILITIES <TYPEOUT, ERROR, SCOPE, ETC) 





001310 


oocco4 
001312 


001236 


000022 
900020 


001246 


177776 
000004 
000006 


13:18 


3$: 
14S: 


138: 


4$: 


S$: 


6$: 


WHICH: 


VECMAP: 


18: 


.2$: 


7$: 


JO4 


OMNUM 

#20, DMNUM 
13$ 

(Rl) 

6(R1) 
#10,R1 
#169000,R1 
DMACTY 
DMNUM 


DMNUM, Ri 
R1, SAVNUM 


#5, 384 
DMACTV, SAVACT 
VECMAP 

MERR2 
RO 


“a 
#14$, (SP) 


e,e 


83400, » STRTSW 


#340, a#22 
#43, a820 
OR Hae Re 


#4) (R1)+ 
(RO)+. (R1)+ 
Rl, #1000 


phacrv, . TEMP 


BRE(LRY), PS 
(Re) ,R1 
#200/4(R1) 


seritie biR1) 
se1T9!6178, (RL) 


8 


fog a COUNTER 
;ARE MAX. OF DEV FOUND? 
sYES bon’ T Toor FOR "AN? MORE. 
CLEAR BIT 10 


:CLEAR SEL é 
;UPDATE CSR POINTER ADDRESS 


;BR IF MORE ADDRESS TO CHECK. 


;WERE ANY OMC11°S FOUND AT ALL 
sERROR AUTO SIZER FOUND NO SNE L? S IN THIS SYS. 


;SAVE NUMBER OF DEVICES 


s SeteDaTE ACTIVE REGISTER OF DEVICES. 
:SET THE BIT 


;BR IF MORE TO GENERATE 

RESTORE TRAP VECTOR 

; SAVE ACTIVE REGISTER 

:GO_FIND THE VECTOR NOW. 

SNOTIFY OPR THAT NO DMC11°S FOUND. 
; MAKE lle LIGHTS ZERO 

:STOP THE SH _ 

DISABLE CONT. SW. 

ENTERED BY NONSEXISTANT TIME-OUT. 
RETURN TO MAINSTREAM 


;SET IOT Ma PRIO TO 7 

SET IOT TRAP VECTOR 

SET SOFTWARE POINTER 
sELOATING VECTORS START HERE. 


0 N 
START FILLING VECTOR AREA 
‘ADD 2 TO RO +R1 
;BR IF MORE TO FILL 
: STORE ih 
seelive ou QUT A BIT 


L_DONE 
:R4 iS INGeEX REGISTER 
:SET PS TO 7 


‘Bur ENSTRUCTION IN PORTS 
sEORCE AN INTERRUPT 


Pan R FIme TO INTERUST 





DZOME MACY11 27732) 22-SEP-76 13:18 PAGE SO 
OZOMEA.P GENERAL UTILITIES (TYPEQUT, ERROR, SCOPE, ETC) 


1g2704 000002 #2,R4 ep Next Ye PS LEVEL 


012026 put ns »PS ae ee LEVEL IN PS 
005300 8 : eats 2(Re) NO eT ASSUME 300 AT LEVEL S AND FIX DMC11 


000010 410, Re : POP i POINTER 


BR EEP 
oooo02 : (SP) ,2(Re) GET VECTOR ADDRESS 
900007 oog002 #7, 2( Re) : CLEAR 2 ulik 
012030 BRLVL+2(R4),RS ; LEVEL OF DMC11 
RS Stier LEVEL 4 PLACES 
RS :TO THE LEFT FOR THE 


OO IMUI£GIT-C.003~™3 


RS :STATUS TABLE 
170777 #170777, RS :CLEAR UNWANTED BITS 
oodo002 RS. 2(Re} :PUT BR LEVEL IN STATUS TABLE 
ees (SP)+° -POP IOT JUNK OFF STACK 
011746 #3$, (SP) :SET FOR RETURN 
000207 : PC sALL DONE WITH “AUTO SIZING" 


pooo00 : D  GLEVEL 0 


frurururufururururururnormrorororrororu nororn 


OWOWDVOWWODODOWOKODWWOOOWoOMG “I~I~ 
oOo estat brat a ittet a bt mt cited ioe 


ll 
° 
Q 
| 
0 
0 
0 
0 
0 
0 
0 
0 
a] 
0 
0 
Q 
0 
) 
a] 
0120 
Ole 
0 
0 
0 
Q 
0 


167136 NTTY: Le: aTKCSR ;WAIT FOR DONE 


167132 V JTKDBR,R3 ;PUT CHAR IN R3 
167130 I aTPCSR :WAIT UNTIL PRINTER IS READY 
167124 R3, ITPOBR sECHO CHAR 
000240 #BiT7'BITS,R3  :MASK OFF LOWER CASE 
: PC : RETURN 


O1e97e 000207 


5 RRAAKAAAAAERERRAA REAL EERERE TEST | RHHRKAKARAAAAKRSRAH SKATERS 
:#0UT CONTROL REGISTER READ/ONLY TEST 

#00 A MASTER CLEAR VERIFY | THAT ALL READ/ONLY 

weit ARE IN THE CORRECT STATE 

to Fae MRR Ee ER ES TIRE I lI 


012737 000001 O0lee6 : #1, TSTNO 


012737 o12150 001216 M 8TST2, NEXT 
:R1 CONTAINS BASE DMC11 ADDRESS 
005077 167270 QDMCSR :CLEAR SELO 
612702 000011 ‘eae MOY #11,R2 :SAVE R2 FOR TYPEOUT 

104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 





NOOVIOVOOO00O an 
pe eee 
furururururufrorm»=fuoru 


fru 
PUPUFULUTU Ur oer —b-= 
P= : 


Sp Step adepepeterperpater4 oo 


‘ 22-SEP-76 13:18 PAGE Sl 
LINE UNIT READ/ONLY TESTS 


000004 


Bebued 


000002 O0lee6 
Ole2i6 O0lel6 


000012 


pete 
000017 


000093 
012270 


000013 


000004 
000213 
000100 


021004! <20%*11> 
MOV 4(R1),R4 


5 RA RRRAAK ELK KA RE RA AE RERALERE I CO FEXKHK HALLE HK FL ALKA LASER ELSE 
IN CONTROL REGISTER READ/ONL Y 

:*#D0 A MASTER CLEAR 

psB1T3 ARE IN THE RORRE 
Se LEncakalaartakbuntdanhsasteiapeianbatenmbeneeuumenminauns 


OMCL 
021004! <2e0%12> 
MOV 4(R1),R4 


5 RREKKERKAALA RAE RAARKRHRHARE TEST 3 RRXRRLAHRALARAR AKA EARLE EAES 
Beats! ER READ/ONLY 


; #NODEM CONTRO TEST 
M * eet Ai ALL READ/ONLY 


;R1 CONTAINS BASE DMC11 ADDRESS 
:MASTER CLEAR We aie 

SAVE Re FOR TYPEOUT 

;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
aOR Tet Ihe UNIT REG 13 


4 
: CLEAR UNKNOWN BITS 
PUT RING, OTR, IN 


ROMCLK 
021004! <20*13> 
MOV 4Y(R1),RY 


YE 
TERROR IN LU_13 
;SCOPE THIS TEST 


















Dut FOUND" a AA REG il 
AR NOWN B “: 
ptt BeXPeC ED” IN RS 
31S OUT YES SET? 


ER ROR IN LU Ii 
; SCOPE THIS TEST 














TEST 
RY THAT ALL READ/ONLY 
STATE 








r 








;R1 CONTAINS a DMC11 ADORESS 
;S VE Re FO 


SREXT HORD 1S INSTRUCTION, ROMCLK PC=S304 
sPORTY+LINE UNIT REG 12 

;PUT R4 

:CLEAR UNKNOWN BITS 

sPUT "EXPECTED" IN RS 

; ARE Me CLEARED? 


iERR OR IN le 
; SCOPE THIS” re81 





















RS 
DTR, AND MODEM READY SET” 





MO4 


DZOME MACY11 271732) 22-SEP-76 13:18 PAGE Se 
DZDMEA.Pil LINE UNIT READ/ONLY TESTS 


y RHXHHK RHA AK AKKRRAANELERKERHE TEST 4 £ERKFRHRERAFRA FLEES SE ELE SLES 
; XMATNTENANCE REGISTER READ/ONLY TEST 

*¥D0 A MASTER CLEAR, VERIFY THAT ALL READ/CNLY 
4617S ARE IN THE CORRECT STATE 

5 HHH REALE KEELE HEHE EKER KEK LEK ER KEKE EEK EEE EES EEKE LAE EA ES FASS SS SSS 


12270 912737 o00004 001226 : #4, TSTNO 
012737 012362 oO012i6 M sTeTe, NEXT 
;R1 CONTAINS BASE OMC11 ADDRESS 


104412 MSTCLR *MASTER CLEAR ay MCLi 
000017 MOV #17,R2 SA VE Re FOR TYPEOUT 
ROMCLK “NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
021004! <20%17> ;PORTY*LINE U NIT REG 1 
oo00004 MOV 4(R1),R4 : PL RY 
#206 RH :CLEAR UNKNOWN BITS 
Sl :PUT "EXPECTED" IN RS 
020000 001365 weit, STATI 315 L LU AN M8202 OR M8201? 


I 
000040 a0, R4 MASK OFF SI BIT IF M8202 
000040 BIC welts, RS :SI BIT IS UNKNOWN ON AN Mg202 
RS,R ; ARE SI oe ICIR SET? 


Y 
2 TERROR IN LU 17 
104400 : :SCOPE THIS TEST 


1) 
0 
0 
0 
0 
0 
0 
Q 
0 
Qle3 
0 
0 
1] 
0 
0 
0 
0 


5 REF RKAEHAAR FLAK ERE RRAREKERE TEST 5 £RRKKAARAS ELLA RELA RELELELES 
: *LINE UNIT REGISTER Wai Tene TEST 

:¥SET BITS IN LU REGISTER VERIFY IT IS SET 

sacl ERR BITS IN LU RECISTER ae VERIFY IT IS CLEAR 

KEKE KKK EE KK EEE AEE EE EAE EERE SEES EEE EE EEE ER EEE EER EEE EEEEEREREE 


o90095 001226 : TNO 
012522 O01216 M tate NEXT 
012412 o01220 : #13, LOCK 
:R1 CONTAINS BASE DMC11 ADDRESS 
‘MASTER CLEAR DM 
000012 MOV #12, Re ; SAVE REGISTER ADDRESS FOR TYPEOUT 


090040 000004 : 9 #40,4(R1) ;LOAD PORTY 
:NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
;SET BITS IN LU-l2 
;NEXT WORD_IS INSTRUCTION, ROMCLK PC=5304 


AD LU- 
p00040 0 PUT “EXPECTED” IN RS 
oc0005 eRe RY :PUT “FOUND” IN RY 
090337 IC #337, RY : CLEAR UNWANTED BITS 
ae. RS5,R4 :IS BITS SET? 
23 :BR IF YES 

sERROR, 5:7 S IS NOT SET 
: : SCOP: sleresr (SWO9=1) 
012737 ole46e odi220 MOY #23, LOCK :NEW SCOPL 


NOOVOVOVOVOVOOHOOOIND O00 
Os 0 he 
rurororroffferrulfruror:ofroru 









OZDMEA.P11 





2374 O125s2 
2375 012560 
2376 12562 
2377 012564 
2378 O1e566 
2379 012570 
2380 012574 
2381 012600 
2382 012504 
2383 012606 
2384 012610 
2385 12612 


DZOME MACY! 


2349 912474 
3350 012476 
2351 912500 
2352 012504 
2353 012510 
2354 Olesle 
2355 012514 
2356 O1e5i6 
2357 012520 


27(732) 
LINE UNIT WRITE/READ TESTS 


00004 


eye 


104400 


012727 
Ole737 
012737 


yea 


104400 


ee-SEP-76 13:18 PAGE S3 


ococos 
000337 


000006 
012662 
01esSe 


020017 
000001 


000001 


000905 
000376 


001226 
O0ie16 
001220 


oo0004 


001220 


3$: 


4$: 


TSTb: 


1$: 


es: 
33: 


NOY 
















CLR 4(R1) :LOAD PORTY 
ROMCLK sNEXT WORD 1S INSTRUCTION, ROMCLK PC=5304 
122112 ; CLEA AR BIT 

RONCLK ;NEXT WORD. 7S INSTRUCTION, ROMCLK PC=S304 
CLR RS BUT “EXPECTED” IN 5 

MOVB  5(R1),84 :PUT “FOUND” IN RY 

BIC #337 RY ;CLEGR UNWANTED BITS 







CMPS RS,R4 iIS 
4$ ;BR 


YES 
H 3 ;ERROR, BITS IS NOT CLEAR 
SCOP 1 ;SCOPE SUBTEST (SWO9=1) 
SCOPE SCOPE THIS TEST 







g RXKKKRAEKAARKRAAERERHEREERE TEST G 4XXRRH HLA RRAHLEALEREELA SEES 
: #LINE UNIT REGISTER WRITE/READ TEST 

:¥5ET BIT1 IN LU REGISTER 17, VERIFY IT IS SET 

: ¥CLEAR BIT1 IN LU REGISTER 17, VERIFY IT IS CLEAR 

ESE EE EEE EE SEER PEE GREASE ESET EE 







MoV #6, TSTNO 
MOV #TST7. NEXT 
MOV #13, LOCK 










;R1 ore wes ioe ADDRESS 









MSTCLR :MASTER CLEAR 

MOV . #17,Re jSHVE REGISTER ADRESS FOR TYPEOUT 

MOV #1,4(R1) LOAD PORT 

ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
122117 :SET 






ROMCLK ; NEXT HRD IS INSTRUC TION, ROMCLK PC=5304 
021365 EAD LU- 






be ‘Pot EXPECTED" IN RS 
MOVE S(R1>,R4 :PUT "FOUND" IN 

BIC #375 ,R4Y : CLEAR UNWANTED BITS 
CMPE ~=—s- RS, R4 :IS BIT1 SET? 






BEG es ‘ Be IF YES 










HLT 3 :ERROR, BIT 1 IS NOT SET 
SCOP1 ;SCOPE SUBTEST (SWO9=1) 

MOV #33, LOCK cOPi 

CLR 4(RI) OAD PORT 

ROMCLK : NEXT WORD * IS INSTRUCTION, ROMCLK PC=S3C4 
122117 :CLEAR BIT 

ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
921365 READ LU-17 

CLR RS :PUT “EXPECTED” iN RS 

MOVB  S(RL),RY ‘PUT "FOUND" IN 

BIC #376 ,R4 CLEAR UNWANTED BIrs 

CHP RS.R4 :IS BIT i CLEAR? 







IT1 IS NOT CLEAR 
EST (SWO9=1) 
TEST 
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MICICKMO 


atu 


ret 
tetas 


Se tetetetotatatate: 
(a) 


os 


= 0-20 20 +0208 0-0 0 OO 9 0-8 boo * + 8 2 8 B08 8 Ob 8 9b 20-2 bo 0 be oh 0 ho Bho ho ho ho ho 
QOodoc 
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BOS 


s PERRRERASESRRESERRSE SRS LEER TEST 7 Fete eastssse ses essssessstsss 


:*LINE_ UNIT REGISTER WRITE/REAC TEST 
:#FLOAT A 1 THROUGH LINE UNIT REGISTER 13 
:®FLOAT A O THROUGH LINE UNIT REGISTER 13 


SL RRRREAASSSSSSSSSSS SESS SSESSSESSS SEAS ESAS AS SESE EEGESESSSEES4FSSS4 


; TEST 7 

TsT7: ov 87, 
MO" avs 
MOV eS4$ 
MSTCLR 
MOV 813,82 
MOV 81,80 
MOV RO.Y4'R! 
iC g2s7 4c 
ROMCLK 
122159!13 
POMCLK 
21005! 13#20) 
MOV 
Bic 287 RS 
MOV Sik ) 
Bic acs 
CMP 5 RG 
BEQ 5c$ 
LT 
SCOP 
ROL RO 
QNE $4 
MOV a6? 
MOV gi, 4 
COM RO 
MOV RO. 4, R]) 
Bic we87,4¢R1) 
ROMCLK 
122;59!13 
gach 
21005!« 1382 
MOV RO 
Bic = se? 
move SSL) 
Bric ses 
CMPR ORS 
BEG 68¢ 
HLT 3 
SCOP! 
CoM RO 
CLC 
ROLS RO 
BNE $33 


ae ee eo 


;START WITH BIT 


;PUT PATTERN INTO PORTS 
;CLEAR UNWANTED BI 


ITS 
sNEXT WORD IS INSTRUCTION, ROMCLK PC=S30 


;MOV_DATA TQ ITBUS REGISTER 13 
sNEXT WORD IS INSTRUCTION, ROMCLA P 


Te - 
43/8) ~~ 


sPUT “FOUND” INT 
;CLEAR UNAANTE! 
;DATA CORRECT” 
;BR_IF YES 

; ERROR 

3 QWO9=1? 


CLEAR CARRY 

:SHIFT BIT IN RO 

:IF RO=9 THEN DONE 

=NEW SCOP! 

-START WITH SIT 0 
:CHANGE TO FLOATING ZERO 


ERROR 

Pe hy 

s;CHANGE TO FLOATING | 
» R CARRY 


FT BIT IN RO 
RO=O THEN DONE 


sCL 


SHI 
IF 
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unt BITE Read TESTS 


ocn9 
o-oo 
C9 
ow- 
rtstw 
mcs 
0 +0 +9 
futuro 
“joa 
GIGI 
~g~3- 


o-- 
1-35 
jo 


oo, 
fore + 
oc 

Cruru 


SMO OnwT £ 
£0 
-—-o 


GIGITUTUL Ue o 


9-0-9 


ate tee titel ag 


. 
) 


C0000 000) GIGI GIGI OI GIO) GI OIG) CI OI I GI GIGIOIGIGIGIGI“) GIGI) 
MOoOOr-r-r 


fos af 
be a 
OMOOOOVINDNIOO COO OO OI OO IOOOOOOOVVOOOVIOOOM 


088 0s 88 = oe + be 8 oh bh 8h OO 8h 2 bh 0h 2 po ho b= ho bo hh 2 ho Bo 


LUTUTUTUS-- 6 0-0 + 


fororororufororofororofurfiess + 0-20 = b+ 0+ >= b+ b+ h-2 b+ 8 = b+ 0 bh 0 oo he he 
to . OTIC sere 
10M LOM £HUOMMMO £M fr 


COCCI 
e+ Oe O00 - 09 


’ 
301M 
» 


“Coc MILIO WI 


Toe O.000 SOPUTE GO 
LILOCIOG 
HUFUTOFOR 

VOW 


PEUTAUIAUIANIAUIAUIANIARI ARI ADT Atlal 
-o- 


COUCATOATOATOFI COU CATOHICFTCATGT GE 


a 





COS 





SCOPE ;SCOPE THIS TEST 





sHEHRRRERRSESS SERS S SRE REEEES TEST 10 Hanes sess ees sssseestsssetes 


:*#LINE_UNIT ae WRITE / 


READ TEST 
:#FLOAT A 1 THROUGH LINE UNIT REGISTER 14 
;*FLOAT AO THROUGH LINE UNIT REGISTER 14 
: Ss RSSSSRARAEEE SSSA AAS SSAA LFS LEF AALS SLA ASF S FA SFF FFF SESF SSSA SS SSS 


3R1_ CONTAINS EASE A ioe ADORESS 


ROMC ¥ :NEXT WORD IS gre eran ean Pr 
NEXT WORD IS INSTRUCTION, ROMCLK PC=S 


; TEST 10 
T10: MOV = BO, TSTNO — 

MOV gTST11, NEXT 

MOV 8643,L0° 

MSTCLR :MASTER CLEAR DMC 

MOV #14. R2 :SAVE REGISTER AGBRESS FOR TYPE! 
MOV #1,80 :START WITH BIT O 

MOV RO, 4(R1) :PUT PATTERN INTO FORTY 
h2etugt14 -MOV DATA TO IBi 

OMCLK 

21005!« 14420) :READ FROM IBUS REGISTER ty 
MOV Ro.85 PUT EXPE INR 

MOVE SiA1),R4 :PUT "FOUND" INTO R4 
CMPS) sé :DATA COR 

BEQ 55$ -88 TF y 

HL? 3 ;ERRO 

SCOP] »SWOS=1? 

LC : CLEAR 

ROLS = «RO “SHIFT BIT 
BNE 4$ :IF RO= 

MOV #57, LOCK “NEW 5CO 
MOV 8: ,R5 : START “NITH BIT O 
COM RO :CHANGE TO FLOATING ZERO 
MOV ss RO, (RL) PUT PaTT ERN INTQ PORTS 
BOMCLK sNEXT WO 
12210014 :MOV DATA TO 128 reeds 
ROMC “NEXT WORD I 
21008) 14920 ;READ_FROM 
R :PUT EXPEC 

Move SiR). RS :PUT “FOUND” INT 
CMPS :DATA CORRECT? 
BEQ 3 33°" :BR IF 

L 3 :ERROR 

COP! 

3M RO i RnGe TO FLOATIN 
CLC iSreaR C RRY 
ROLE sa SHIFT Bi INR 
BNE $33 -IF RO=O THEN DO! 

COPE aE OPE THIS TEST 


- 


NSTRUCTIC ta — PlsS304 


LL seeweeeerereeeeesereseeeese 


sHethteeeeeereseretessesesee TEST 





oe 











a oie unt 
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vent 


co 


UO OT a) prertey 
Hat 
p) 


TUR roe rerervene 
CUT LIT LIT LO ob 0--0-- 6 =< 


i 
£OITU-O.0MIOU £ bs 


for 
‘Eo 


. 
ify) 
ar 
£00 
++0-(90--(90) 


IC3~3>3 


NOONONOOoND oo 
Ob 20-20-00 op pe 
QOOO.-t-MOO eo, 


(+= £0V.E ££ 


GIGIGIGI 
GIGIGIUS 


909 


A hs 4) 44 4 4, 
IGT wITuTeD 
ure-(9.0M>--. 


UH AL of 44 


f 


in 
(IGIG) 
(Nt to 


rrr 
ave 


-o 


oo 
Gots 


YOoVIoOOI000O00o 
COWIGIGIGIGWIGIOIGI GIG 
COCICICICIGIGI GIGS 
FF EERRSRY oo 
OM C£ruMeVoe+£ aw 


ee eed et eee ed ed ed ed 
2 JONOOIO £ e+ 


CATERER UALCAT Carta) And bbe rear 


CeO Man Ono aia 


rororurofrororororrrurur 
oONO@uUls Gofue- 09.0009 


ame 


ae eee = ee eee ee 


DOS 


:*SWITCH PAC TEST 

:sTHIs TEST READS SWITCH PACs! 
*THIS SWITCH PAC CONTAINS THE DOCMP LINE 8 
MiveeriererervrertrrrrertriTetttrerterrrretti rt ttt tir tititt ies 


: TEST ll 
Mov #11, TSTNO 
MOV aTSt12, NEXT 
:R1 CONTAINS Past pneu ADDRESS 


MSTCLR :MASTER CLEAR 

ROMCLK :NEXT HOR 1S INSTRUCTION, ROMCLK P¢28204 
02134 :PORT You 

MOV 4CR1) RY : Pi i $e FOUNE" IN 

Mova = STAT2.R5 BUT “EXPECTED” IN RS 

CMB RS RY :SW OK? 

BQ :BR IF YES : 

Mt 3] SERROR. SWITCH PAC READ ERROR 

SCOPE ESSpe rate FEST 


sRERSSRERRSRS RS SRR HL SSSSRER TEST LS Hee eL ESHA HALES ELAR SELES FE 
-aSWT TCH Por TEST 

:#THIS TEST. READS SWIT CH PACR2 

L#THT S SWITCH PRC CONTAINS THE 8M873 BOOT RDO 

PUTO STOVTCCIIIrrrrrrirrrerititettrtttetlittcriiirir iil el itil ss 


MOV 812, TSTNO 
MOV eTSt13, NEXT 
:R1 CONTAINS BASE OMC1L1 ADDSESS 
MSTCLR MASTER CLEAR OMCLI 
ROMCLK "NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
021344 s CORT SeLUL6 
MOV 4(RI) RY :PUT “FOUND” IN RY 
MOY STATO+1 RS PUT EXPECTED" IN 5 
CMPB RS RY $4 OK? 
BEQ 1$ ;BR IF YES 
HLT 3! sERROR, SWITCH PAC READ ERRO 
SCOPE COPE THIS TEST 


; PEPPLARAAEERARAA RE LTARALLE TEST 13 eeeeeseeeetse reese ssserreese 
:#LINE UNIT CLOCK TEST 
:eTHIS TEST VERIFYS THAT THE LU INTERNAL CLOC 

*#(BIT 1 IN LU-17) IS WORKING 
SSEAUERSOUERSSLDSSEDDESAGEODOURESGAGRORERARUAEOOEDREERIONSEDE 


; TEST 13 
hoy #13, TSTNC 
MOV eTst19, NEXT 
sR Sorat BASE OMeLL RDDRE 
MSTCLR MASTER CLEAR DMCLL 
CLR TEMP : PREPARE “FOR DELAY 








e+e 


rurorufrorururounorurururororurur 
CoP Ce Oh oP a HOP (PO cP Ge oP bs 


frororuruornpe 


GOT ©. 00 “OU Gore 


415 


OOVDIOOABIOIAIVIOOOOVWOI0O 
O-+ 0 -* 0-2 B+ b+ bP —— + 6-0 b 2 & = B= po we bp Be 
AIGIGIGS 
£ 
ra 
o 


CICIGILIGILIGION 
am) 
or 


> 


CO CI WIGIGI ICI GI GIGI CI GIGIGIGIGIGIOG GI) 
TU so C ISIN oO 
est sttests ir vi e te Coto 


WINTON Se OE 


CIN 
AGN 
MOT + 


OOOOOOOVOOOOOOOOOINIYD OM 
ia 


0 0 = bb b+ &— b= + = b= 0 he 0 2 


tartaltal 
wns 
oow 





Macy ll 2 3° (732) 
1 “Lt INE UNI 


104c06 
104400 


aun 
iT 


000002 


007364 


004000 
000001 


ANNA 


0 
nodded 


PoE 
TE READ 


3} 18_ PAGE 57 


1$: 


Gore 
hits 


43: 


1$: 


EOS 


ROMCLK sNEXT WORD JS INSTRUCTION, ROMCLK PC=5304 
a33eh tHERT WORD 
#2, 4(R1) -IS CLOCK BIT SET? 
eAE 2 -BR IF YES 
INC TEMe : DELAY 
BNE 13 : DELAY FintSHeD? 
HLT 4 -ERROR SIT IS STUCK CLEAR 
CLR TEMP -PREPARE FOR DELAY 
ROMCLK sNEXT WORD 15 INSTRUCTION, ROMCLK PC=5204 
021364 : PORTHeL 
BIT #2, 4(R1) 21S cLoCk “Bfr CLEAR? 
BEQ i :BR IF YES 
INC TEMP : DELAY 
BNE 3 BR IF DELAY NOT DO NE 
HLT 4 !ERROR SIT ts TUCK SE 
SCOPE 


ae att ae oy aaa TEST 14 eens eeeen ne tases enseesese 
:*OUT DATA SILO TEST 
:4SET ae ae LOAD OUT DATA SILO 


-#VERIFY THAT OCOR SET INDICATING THAT THE 

> #CHARAC TER IS AT THE BOTTOM OF THE OUT SILO 

23 er RS AR UR RO ae 
; TEST 14 
MoV 814, TSTNO 
MOV s7Sti§ NEXT 

RI CONTAING | BASE pneu ADDRESS 

MSTCLR :MASTER CLEAR DMC 

V aBIT11, (RL) SET LINE UNIT Soe 
MOV #1 .4(Ri) L900 PORTY WITH SITO 
ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
le2il) :SET OM 
ROMCLK NEXT WORD 1S INSTRUCTION, ROMCLK P¢=5204 
122110 LORD OL'T DATA SILO 
TIMER, 2 WAIT 6COR 
MOV $17,Re i SAVE ADDRESS FOR TYPEOUT 
ROMCLK NEXT oR is INSTRUCTION, ROMCLK PC=S304 
021364 : PORTY 
MOV 4(R1) RY : PUT “FOUND IN RY 
IC 8357, 24 : CLEAR UNWANTED BITS 
MOV g20,R5 T “EXPECTED” IN RS 
CMPB RS. R4 it ocdR SET? 
BEQ 13 :BR IF YES 
HL} 5 
SCOPE SCOPE THIS TEST 


sRRPRPRRRRRRRLRRRRRRRRAR HAAR TEST [DS seaeaeeeeereeeeearesesseeee 
: #DDCMP TEST OF RTS AND OUT ACTIVE 
:#SET SOM AND LORD OUT DATA SILO 








DIDME 
DZOMER.P LL 
2625 
2626 
esr 
S$: 

2523 
2530 
2621 912552 
esse 013560 
2$33 f 
2é34 13566 
£635 013570 
e638 913574 
2637 013692 
2638 913604 
2539 013606 
2640 013610 
2$41 OQlsble 
eS4#e 913616 
2542 O13$22 
2644 013626 
2s45 013620 
2646 O1363< 
es4" 012636 
2s48 O1364e 
e649 913646 
2650 912650 
e651 013652 
2s O13654 
2653 013654 
2654 013660 
2655 013662 
e656 013664 
2657 913670 
2658 012674 
2s5$ 913700 
26§0 013702 
2651 913704 
262 013706 
2663 013706 
e554 
eses 
2ésé 
2567 
ebts 

; esses 
2670 
2671 

| e67e 

| pge7r3 

2E74 

| 2675 013710 

es7— 013716 
267 

| 2678 013724 

| 6679 013726 

| 2680 013732 

| 

j 


MACYI1 271732) l 
‘BASIC TRANSMITTER TE 


- 
» = 
+ 
i) 


22-SEP-7¢ 


2: 
$7 


004000 


9009081 000004 


026144 
009002 
000011 


009004 
00257 
000120 


000013 


000094 
009337 
090040 


OOCO16 
014106 


964 09 


aia 090004 


l 
TS 


8 PAGE $8 


TSTLS: 


1§: 


23: 


TST16: 


FOS 


:#SINGLE STEP 2 DATA CLOCKS 
g#THAT RTS AND ACTIVE ARE SET 


VERIFY 


S RHRRKERAAA AFA SRA LEAL LES LE LRA ESA SLEAFLEAFF LFS ERSF FAS S+FLIF SEES 


TEST 15 

MoV #15. TSTNO 
MOV sTSt16, NEXT. 
MSTCLR 

MOV #8ITL1 
MOV #1,4(R1 
ROMCLK 

leell! 
ROMCLK 

122110 

158 PC, OCOR 
DATACLK, 

OV $l1,Re2 
ROMCLK 
021224 
MOV 4(R1) RY 
BIC #257, R4 
MOV #120.85 
CMP “RG 
BEQ 
MOV #13,R2 
ROMCLK 
02126 
MOV S(RI) RY 
BIC #337, R4 
MOV #8I7$,R5 
CMPB RS. RY 
BEQ 
HLT 3 
SCOPE 


;R1_ CONTAINS get ro ADDRESS 

:MASTER CLEAR 

;SET LINE NIT. Loge 

; LOAD PORTY WITH BITO 

py ee IS INSTRUCTION, ROMCLK PC=S304 


{NEXT WORD AS oe ROMCLK FC=S304 
LOAD OUT DATA SILC 
WAIT FOR es 
:CLOCK DATA FOUR Y 
:SBVE ADDRESS FOR "PeOuT 
T WORD _ INSTRUC TON, ROMCLK PC=S304 


*LU | 
;PUT “FOUN IN RY 


; SAVE ADDRES 
;NEXT WORD I 
sPORTH*LU 43 


UT 
ON, ROMCLK PC=5305 


S 
RS, RTS SHOULD BE SET 


SATS ERROR 


;SCOPE THIS TEST 


ieee TEST 15 exxeteseraseeeeesessesesese 


;#TEST OF OUT C 


set cre Stee is 


AR 
» QUT DATA 3140 
CLOCK, SET OUT CLEAR 


eee THAT OCOR,RTS. AND ACTIVE ARE CLEARED 
+ SEERA BEELER E RARE EAEERERE REAR REE ES ERS EEA E ESSE EEE EEE SSS42344444% 


; TEST 16 


#16, TSTNO 


MOV eTST1?, NEXT 


MSTCLR 
MOV 


MOV 4(R}) 


eet (RL) 


3R1_ CONTAINS =, Ped ACORESS 
:MASTER CLEAR DMC 
;SET LINE UNIT se 


‘Pbap” PORTY WITH stro 





t- oe ee 
' 


OsOME 
DZDMER. P11 


a 


13 
1 
i 
1 
1 
137? 
1 
1 
- 
1 
] 
14 


mW 
ao 
wm 
oO 
SEE 222002000SS00 


ere er et ar 





MACYLL 27.732) SE l 
BASIC TRANSMITTER TEST 


104414 


104005 
hed 


104005 
012702 


104005 
104400 


012737 
012737 


LO4412 


22-SEP-75 


000913 


eal 


000011 


000994 
000020 


000917 001 
034270 001 


3: 
$7 


000004 


226 
ele 


8 


PAGE $9 


1$: 


2s: 


3$: 


TST1?: 


ROMCLK 


122111 
ROMCLK 

leell 

ISR PC, OCOR 
DATACLK, 

MOV #BIT7,4(R1) 
ROMCLK 

le2il! 

DATACLK. 

MOV #17,R2 
ROMCLK 

021364 

MOV (RL) RY 
BIC 7 RY 
CLR 

CMP8 RS RY 
SEQ 1$ 

HLT 5 

MOV #13,Re2 
ROMCLK 

021284 

MOV 4(R1),R4 
BIc 8337, Ry 
CLR RS 

CMPB) RS, RS 
BEO 2 

HiT 

MOV #11,Re 
ROMCLK 

021224 

MOV 4(R1),R4 . 
MOV #BIT4'RS 
CMPB sé, RS 
BEG 

HLT 5 

SCOPE 


Beige gg ree ek as TEST 17 eeeeee eee eee e ese ee eeeeereee 
: xDDCMP TRANSMITTER 


GOS 


iSET SOn IS INSTRUCTION, 


i BAD tag obfa- 5 eosin 

AD Ph 

sHAIT F ROCOR 

scLocK Bara FOUR . MES 
NEXT HORR ef INSTRUCTION, 

iSET OUT CLEAR 
:GIVE A TICK TQ CLEAR R 1 
RENT ADDRESS FOR TYPEQUT 

T WORD IS INSTRUCTION 


; IN RY 
;CLEAR UNWANTED BITS 
;PUT “EXPECTED” IN RS 
:1$ OCOR CLEARED? 
:8R IF YES 


;SAVE ADDRESS FOR TYPEQUT 


’ "NEXT WORD IS INSTRUCTION, 


SPORTH+LU 1] 

:PUT EXPECTED IN R4 

:CLEAR UNWANTED BITS 

:PU ane PECTED” IN RS, RTS 
IS RTS OK? 

:8R IF YES 

;RTS ERROR 


RENT ADDRESS FOR TYPEOUT 


T WORD 2S INSTRUCTION, ROMCLK PC=S304 


:PORTY*LUL1 
PUT "FOUND" 


IN 
SONLY OUT ve Seat SHOULD BE SET 


1S ACTIVE 


BR IF YES 
sERROR ACTIVE NOT CLEARED 
;SCOPE THIS TEST 


; #PAS HE NOOQW (ST BIT) 
; #0 ON AN ERROR, R3 CONTAINS BIT POSITION OF FAILURE 


b RHKRAER AREAS ARE RARRERD AERA REAAREEAEE RECA AEE STEER REE REE REESE 


; TEST 


ov 
MOV 


MSTCLR 


17 


#17, TSTNO 
#TSt20, NEXT 


3R1_ CONTAINS BASE DMC11 ADDRESS 


MASTER CLEAR ONCLL 










ROMCLK P1=S304 
ROMCLK PC=5204 


ROMCLK PC=S304 


» ROMCLK PC=S304 


ROMCLK PC=S304 


SHOULD BSE CLEARED 





DZONE 


MACY11 27(¢ 732) 


22-SEP-76 13:18 PAGE 60 


HOS 


MOV seri (RI) 
Se OUTRDY 
MOV al "4(R1) 
ROMCLK 

leélll 

MOV 80,RS 

JSR PCO 

MOV RS,4(R1) 
ROMCLK 

l2el 

JSR PC, OCOR 
CLR 

MOV RS ,Re 
DATACLK é 
DATACLK, l 
RORBS Re 

c= 
JSR PC, GETS! 
bcs 33 

HLT $ 

BR 33 

JSR PC,GETSI 
BCC g 

HLT 

INC 3 

CMP #10,83 
BNE 15 
DATACLK, 4 
ROMCLK 

O2le 

BI eSITS,4(R1 
BEG $ 

HLT 34 

SCOPE 


j RERAAP RARER ERE ERLERERE TEST 


:#DDCMP_ TRANSMITTER 


;SET LINE UNIT LOOP 
‘Set BIT 1h QUT-R ay 


TO IN PORT 
; NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 


: LOAD onbbecr eo iN RS FOR TYPEOUT 
DY WAIT FOR OUT-RE 


3W 


s LOAD PORTY WITH SuARS CTER 
;NEXT WORD 19 INSTRUCTION, ROMCLI: 
iL OAD ot T DATA 
WAIT FOR OCOR TO SET 
CLEAR BIT coy Mi is 
LORD egg R IN Re 
TAG Le SET UP TRANSMITTER 
NEXT BIT_IN THE gree ‘$I BIT 
SHIFT Raye LOR BIT INT 


&¢=5304 


0 CRRRY 


W 
SPACE 


CLOCK TRANSMITTER 14 MORE TICK 

;NEXT WORD IS INSTRUCTION, nsec PC=5304 
:PORTY+LU=13 

:RTS ie ad BE CLEAR NOW 


BR IF Y 
ERROR, ‘ats NOT CLEAR 
sSCOPE THIS TEST 


2D RERSRSSE SERS SHEE t Eee LESSEE 


TE 
:*SINGLE CLOCK THE CHARACTER 125 


raVERIFY ESCH BIT PO 
;#PASSES THE BIT WINDOW (SI BIT) 
ROR, R3 CO NTAINS BIT POSITION OF PRAILURE 


DZDMEAR.PL1 BASIC TRANSMITTER TESTS 
e737 014124 912711 904000 
2738 014130 QO04737 CebeTé 
er33 O24134 -012761 000001 000004 
ev74O O14142 104414 
274i 914144 122111 
m3 O14146 G15705 00000 
e743 0141Se O04737 Oeber 
e744 014158 010561 000004 
e745 Ol14l62 104414 
2745 O14164 122110 
e747 O18186 OO4737 026144 
er4¥8 O1417e 905003 
2749 O14174 010502 
2750 014176 104415 000002 
é751 014202 104415 9o00001 18: 
&7Se 014206 106002 
27S3 014210 103005 
e7s4 Q1421e OO04737 Oeblle 
2755 Ol4els 103406 
27S Di422e0 104006 
e75? Ol42ee 00404 
2758 014224 O04737 O26112 es: 
e759 014230 103001 
e760 Ol423e 104906 
e761 014234 3s: 
evte Oi4e34 005203 
£753 014236 022793 ClO010 
e764 Cl4¥e42 001357 
2765 014244 104415 000014 
27S6 014250 104414 
2767 Ol4eSe 021264 
2758 O14%254 032761 900040 o00004 
2769 Ditebe 00140! 
e770 O:4264 104034 
e771 Oi4¥2e66 104400 4$: 
eve 
2773 
2774 
2775 
2775 
2777 
2778 
2779 
2780 
e781 
2782 
2783 
2784 Oi4e70 012737 000020 O0le26 TST20: 
se 014276 QO12727 014452 OO0lels 
2787 O14304 104412 
e788 014306 012711 odO4O0C 
2789 O1431le 004737 Oebe76 
e730 O14316 012761 000061 900004 
2731 014324 104414 
2792 Ol4326 l2geill 


;#0N AN ER 
38 SFRLESREAAERALEFRESALALRAATAPHRAESLESLSRELSSRTSASHSSE SATS SHALES 
: TEST 20 
hov STNO 
MOV sotel NEXT Pie 
2 :R1 CONTAINS BASE IMCL ADDRESS 
MSTCLR :MASTER CLEAR DMC 
MOV #BIT11,(R1) :SET LINE UNIT see 
JSR PC, OUTRDY :WAIT FOR OUT-READY 
MOV #1) 4(R1) :SET BITO IN PORTY 
ROMCLK NEXT WORD 1S INSTRUCTION, ROMCLK Pc=S3C4 
122111 SET SOM 








DZOME MACY11 271732) 


DZOMEA.P11 
e733 014330 


2807 014402 
2s0e 014404 
280$ 014406 
2819 O144le 
2811 014414 
esi2 go14416 
2513 Ol4sié 
2814 O144eS 
28i5 o1442e4 
esis O144 
2817 O1443e2 
2818 914434 
£819 014436 
e820 O14444 
2821 OLS446 
2822 014450 
2823 

e8e4 

e8eS 

2826 

e8e7 

2828 

282s 

2830 

2831 

e832 

2832 

2834 


e835 914452 
2836 O0i4460 
c 


| SE2E  OLYHEE 
| 


2650 014474 
e641 014590 
este 0& 


p- 
“paste TRANSNITTE 


O1er0S 


104006 


005203 
022703 


thaaea 


012737 
012737 


104412 


104414 
le2110 


22- 


000125 
26276 

0004 
026144 


000002 
000001 


000010 
000014 


occc40 


o008e1 
014634 


004000 
026276 
000901 


000eSe 
Oeb276 
000004 


‘e 13: 
R TES 


coooc4 


000004 


1 
TEST 


PAGE 61 


1$: 


es: 


3$: 


4$: 


TST2l: 


105 


MOV $i2S,RS ;LOAD CHARACTER IN RS FOR oe 


138 pc, OUTRDY WATT £OR OUT-REARY 

MOV RS'4(R1) LOAD PORT WITH CHARACTER 

ROMCLK NEXT WORD IS INSTRUCTION, SOMCLK PC=S304 
122110 ;LOAD OUT O 

ISR PC,OCOR WAIT FOR OCOR TO SET 

cL :CLEAR BIT COUNTER 

MOV RS,R2 LORD CHARACTER IN RE 

DATACLK, z 2 TICKS TO SET oF TRANSHET TER 
DATACLK: 1 ‘SHIFT NEXT BIT IN THE WINDOW (SI BIT) 
RORB RE SHIFT NEXT S0F Tuahe "S17 IN 70 CARE 
BCC FE} BR IF CARRY CLEAR 

JSR C,GETS! SGET THE WINDOW 

BCS 3$ BR IF BIT IS A MARK 

HLT ERROR BIT WAS A SPACE 

oR ;CONTINE WITH TEST 

JSR PC. GETSI :GET THE WINDOW _ 

BCC :88 IF BIT IS A SPACE 

HLT “ ERROR BIT WAS A MARK 

INC R3 NEXT BIT 

CMP #10,R3 DONE YET? 

SNE 1§ ;BR TF No 

DATACLK, cs CLOCK TRANSNITTER 14 NORE T2545 
ROMCLK {NEXT WORD IS INSTRUCTICN, ROMCLK PC=Sa04 
021264 ;PORTH+LU-13 

BIT #BITS.4(R1) a7 SHOULD BE CLEAR NO 

BEO <3 F YES 

HLT 34 ‘ERROR, RTS NOT CLEAR 

SCOPE SCOPE’ THIS TEST 


an tamara ae TEST S1 s¥eeeeeteeneeececessecssesce 
: #DOCNP eee 


; HE (ST BIT) 
3#0N RN ERROR, Ra CONTAINS BIT POSITION OF FAILURE 
5 RR EKREREEE A RARARERABE REARS EERESEEESEEESEE ES ED ATE EEEE TEES ERESS 


Mov #21, TSTNO 
MOV #TST22, NEXT 
:R1 CONTAINS BASE OMCL1 ADDRESS 


MSTCLR IMASTER CLEAR CMCLI 

MOV #BIT11,(R1) :SET LINE UNIT LOO 

JSR PC OUTRDY “WAIT FO OUT-RERDY 

MOV #1 ,4(R1) :SET BITO IN PORT 

RONCL K :NEXT WORD Is INSTRUC TION, ROMCLK PC=S304 
a 

MOV 1252, RS :LOAD CHARGER in RS FOR TYPEOQUT 

JSR TROY WAIT OUT-READY 

MOY RE’ ete : LOAD BS oRrg WITH CHARACTER 

ROMCLK NEXT WORD 15. INSTRUCTION, ROMCLK PC=S304 

le2110 sLOAD OUT DA 











DIDME 
DZOMEA.P11 


2849 014532 


2862 01457 
2863 914600 
2854 014600 
e865 O1450¢ 
2866 O14606 
2867 O14610 
eseg 014614 


e886 914634 
e887 014642 


ees 014650 
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BASIC TRANSMITTER TESTS 
OO4737 026144 JSR PC ,OCOR :;WAIT FOR OCOR TO SET 
005093 CLR R3 ;CLEAR BIT a Ae 
01050 MOV RS,Re i080 CHARACT a 
104415 000002 DATACLK, ° 2 TICKS TO S R iy TRANSMITTER 
104415 000001 1s: DATACLK, 1 sSHIFT NEXT BIT IN at's Br Y SI gs) 
106002 RORB Re : SHIFT NEXT SOFTWARE SIT IN TO CARRY 
103005 BCC es :BR IF CARRY CLEAR 
004737 O26i1l2 JSR PC ,GETSI : GET THE WINDOW 
103406 BCs 33 R IF BIT IS A MARK 
104005 HLT ‘ERROR BIT WAS " SPACE 
000494 2k 3$ sCONTINE WITH TEST 
304737 026112 2s: JSR PC .GETSI sGET THE WINDOW 
193001 BCC 3¢ :;BR_ IF BIT IS A SPACE 
i04006 s HLT sERPROR BIT WAS A MARK 
005203 INC R3 sNEXT BIT 
Oee/03 000010 CMP #10,R3 :CONE YET? 
0013S? — BNE 1$ BR IF NO 
104415 900014 DATACLK, 14 :CLOCK TRANSMITTER 14 MORE TICKS 
104414 ROMCLK NEXT WOR D IS INSTRUCTION, ROMCLK ®¢=5304 
021264 021264 :PORTH+ 
032761 o00040 codccd4 BIT #BITS,4(R1) sRTS SHOULD BE CLEAR NOW 
001401 BEQ == 
104924 HLT 34 ERROR, RTS NOT CLEAR 
104400 4$: SCOPE :SCOPE’ THIS TEST 
Det ig es a gg a ae TEST 2D 2444s 4eneeee nas eseeesssesse 
; ¥DOCMP bias tgh Eg 
s*SINGLE CLOCK THE ¢ RACTER 377 
:xVERIFY EACH BIT pOSiTion AS IT 
: #PASSES THE BIT WINDOW (SI BIT) 
:*0N AN ERROR, 3 CONTAINS BIT POSITION OF FAILURE 
Dy RRRRRRERSEE EAR RAD RAAERADADAAAR EE AALS AS EEEER ED EE RRER SEES ESSE EES 
; TEST 22 
012737 000022 001226 TsT22: MOV #22, TSTNO 
012737 OSOleé 01216 MOV 8TSt23, NEXT 
;R1 CONTAINS BASE DMC11 ADDRESS 
104412 MSTCLR :MASTER CLEAR DMC1 
012711 O04000 MOV ar (R1) ;SET LINE UNIT LOOP 
004737 026276 JSR OUTRDY sWATT FOR OUT-READY 
012761 000001 O00004 MOV ai ORD i SET BITO IN PORTY 
104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
le2111 lee2ll! Om! 
012705 000377 MOV #377,RS ;LOAD ewig TEs IN RS FOR TYPEOUT 
004737 O262e76 JSR PC, OUTRDY WAIT FOR OUT- i Ae 
010561 000004 MOV RS‘4 (RL) ;LOAD PORTY WITH CHARACTER 
104414 ROMCLK ;NEXT Th 0 33 INSTRUCTION, ROMCLK PC=S304 
122110 122110 :LOAD OUT DATA 
004737 026144 JSR PC,OCOR : WAIT POR OCOR TO SET 
005003 CLR R3 : CLEAR BIT COUNTER 
01050e MOV RS,R2 sLOAD CHARACTER IN Re 
104415 900002 DATACLK, 2 s2 TICKS TO SET UP TRANSMITTER 
104415 000001 1$: DATACLK, l : SHIFT NEXT BIT IN THE WINDOW (SI SIT) 








DZDME ‘ya 
DZOMEA.P11 
2905 914734 
e905 O14736 
$07 014740 
908 014744 
2909 914746 
2319 014750 
e311 014752 
eSi2 014756 
2e8i3 014760 
2314 014762 
e315 0147 
2916 014764 
2517 014770 
e318 O1477e 
23: 014776 
2eSev 015000 
e321 015002 
eS2e 015010 
2322 015012 
23e4 915014 
232s 
2926 
2927 
2328 
2329 
2920 
2931 
2332 
2333 
$34 
$35 
2336 
2337 
2338 O1S016 
2393S 015024 
2340 
2341 015032 
2342 015034 
2343 015040 
2344 O1S042 
e345 015044 
2346 O1SO4s 
2347 Bt ates 
e348 O1S060 
2949 915062 
23 015064 
2351 0615070 
e293 015074 
e953 915076 
2954 O15:00 
e355 015102 
Bate 015106 
2957 O15lle 
2358 015114 
2959 015116 
2969 O15l2e 


eri 732) 


104400 


012737 
012737 


104412 


104415 
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pasic TRANSMITTER TESTS 


106002 


026112 


Oe611e 


000010 
000014 


000049 


000023 
015224 


004000 


026276 


000001 


026276 
000004 


026276 
000004 


026144 
000002 


cood04 


001226 
001216 


o0cco4 


3$: 


4§: 


TST22: 








;BR IF NO 

:CLOCK TRANSMITTER 14 MORE TICKS 

sNEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
GeL 

iy SHOULD BE CLEAR NOW 


ERROR, RTS NOT CLEAR 
:SCOPE’ THIS TEST 


er ete i TEST 22 4XXXXHSELE HELE XLAELEKE EERE 


tx0N 


: ¥DDCMP 
: SINGLE 


TRANSMITTER 


QCK A BINARY COUNT PATTERN 
OSITION AS _ IT 


DOW (SI BIT) 
N ERROR, R3 CONTAING BIT POSITION OF FAILURE 


sean ARS CONTAINS THE CHARACTER THAT 


5 EHKKK ALEK FL AL ERE EKERE ERLE LAER EEL ET KLEE ARLE EEE EE ELEERE RE LREE 


s TEST 


J 
DATACLK, 





23 


#23, TSTNO 


8TST24, NEXT 


#BIT11,(R1) 
R3 

ited 

RS 

PC ,OUTRDY 
#1, "4CRL) 


PC, OUTRDY 
R4?4(R1) 


RY 
PC, OUTRDY 
R4;4(R1) 


PC,OCOR 


2 





oR CONTA god DMC11 ADDRESS 
;SET LINE UNIT LOoP 


; T_ COUNT 
:R4 CONTAINS CHAR TO BE LOADED IN SILO 
3RS CONTAINS “READY CURRENTLY BEING SHIFTED 0 


iN XT Hk DIS INSTRUCTION, ROMCLK PC=S304 


SE SOM! 

WAIT FOR OUT-READY 

;LOAD PORT4 WITH CHAR?CTER 
sNEXT a IS INSTRUCTION, ROMCLK PC=5304 
;LOAD_OUT DATA 

INCREMENT TO NEXT CHARACTER 
:WAIT FOR OUT-READY 
;LOAD PORTY WITH CHARACTER 

; NEXT ia AS INSTRUCTION, ROMCLK PC=5304 
LOAD OUT DAT 
:WAIT FOR COR TO_SET 
:2 TICKS TO SET UP TRANSNITTER 
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Pll BASIC TRANSMITTER TESTS 

291 015126 005003 4S: CLR Ro 

563 BIEL ae Tovais 000001 1g DAYACLK sna: 1 
e328 b18135 i e003 RG B Re 

gee Bielde AbNeS? o2b112 7s BR ceTSI 
2967 015146 103406 BCS 3$ 
296 015159 104008 HLT 5 
2969 915152 d00404 BR 
2970 015154 004737 O261le 2s: JSR PC ,GETSI 
2971 015160 103001 BCC 
e97e 015162 O06 HLT 
2973 015164 3s: 
2974 015164 005203 INC R3 
e975 015166 22703 ooon10 CMP #10,R3 
es7— 015172 001357 BNE 1g 
2977 015174 095204 INC RY 
2978 015176 C4737 o26276 JSR PC, OUTRDY 
e979 015202 Olo461 Sd0004 MOV R4'4CR1) 
2980 015206 104414 ROMCLK 
2981 O15210 122110 122119 
2982 O15212 o05205 NC RS 
2983 015214 022705 ooo400 CMP 8400, RS 
e984 O15220 O01342 BNE 4 
2385 015222 104400 cS: SCOPE 


2994 ; Test 24 


e396 015224 012737 900024 001226 TST24: MOV #24, TSTNO 
ea O1S23e Ole737 O153l2 COlelt MOV #TST25, NEXT 


e339 015240 104412 MSTCLR 
3009 15242 QO12711 004000 MOV 


rt (Rl) 
3001 O15e46 O1e702 000012 MOV 2,Re’ 


3002 QO1SeSe 004737 Oeblbe JSR PC. s SYNC 
3003 015256 900005 5 
3004 O15260 104415 c00054 DATACLK, SY 


3005 915264 104414 ROMCLK 
3006 015266 d21244 021244 

3007 915270 O16104 oo0004 MOV 4(R1),R4 
2008 015274 O42704 000277 BIC #277, RY - 
30039 015300 OoSoos CLR 5 

3010 015302 120504 CMPB sR’, R4 
3011 O15304 001401 BEQ 1§ 

2912 015306 104046 HLT 40 

2012 O15310 104400 1$: SCOPE 


2388 j RR RHHH AER ER EAR RAELE LAER ERE TEST OY SXXHHEKRXHHAE SHEERS ES LEEESEE 
29389 ; xDDCMP STRIP SYNC TES 

2930 ;*SET LU LOOP, etn NGL —E STEP S SYNCS 

2991 sAVERIFY THAT IN ACTIVE DOES NOT SET 

2992 5 EXE LEK KKK ERK E KEKE EKA EEK KKK SEER EERE EEE SEE ELSE LER SEEKERS EEE 


;NEXT WORD IS pepene ROMCLK PC=S304 
sPORTHe LUl2 


j RRRRAHAEARAREAARERERARRHLER TEST 25 2RRRHRARRARARARRAREREERE RRS 














tee hee Koen En 
cay et Gelert zARRY 


Bert 


;NEXT B 
:DONE_YET? 


ie CHARACTER 


ACTER 
iNet Ao IS INSTRUCTION. ROMCLK PC=S304 
;NEXT CHARACTER 
ONE _YET? 


; 


NO 
:SCOPE THIS TEST 











;R1 CONTAINS BASE DMC11 ADDRESS 
;MASTER ¢ CLEAR DMC11 


SSave'L LU REG FOR TYPEOUT 
SINGLE CLOCK 5 SYNC CHARACTERS 









UT “F 
; CLEAR UNWANTED BtTs 
;PUT “EX R 














‘ERROR ACTIVE IS NOT CLEAR 
:SCOPE THIS TEST 












OVOVIVOVOVOOVOOOOO0ONO oH 


OOOOVOOVOVOOVOOOOOO oH 
02 = 0 bs bs ee 
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012737 
012737 


104412 


194400 


012737 
012737 


104412 


104400 
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BASIC RECEIVER TESTS 


Co00eS O0lee6 
01540e O0lel6 


004000 
000012 
026162 


009064 


000004 
000277 
000100 


009026 
015470 


004000 
00001e 
026162 


co0de4 


000004 
000277 


"Hi 
SCOPE 


eet Ly IN Op SIN nd 


:¥SET 
HATERIFY 


MSTCLR 
MOV 
MOV 


S 
DATACLK, 


Se cope sor ge a TEST 2G £XXXXXXHHHAEXEK ELE EH LE SEE ES 
; XDDCNP IN ACTIV Ses EST 

;*SET LU LOOP, SIN STEP 1 SYNC AND A NON-SYNC (301) 

seVERIEY THAT’ IN ACTIVE DOES NOT SET 

5 HHH KEELE LEE HEHE SEEKER A KEEL EEE SAKE AKA E EERE KEKE AEE EERE XE EEEE 


; TEST 2% 


Mov #26, TSTNO 
MOV #TSt27, NEXT 


MSTCLR 
MOV 
MOV 


1 
‘alg a 


MOV 4(R1),R4 
BIC #277, RY 


¢ RS 

CMPB RS,R4 
1$ 

40 


H 
SCOPE 


abe eee ze ges AND A NON-SYNC (301) 


cia dandannashaentahetatnnltchiimmnmenteieibinaierinenteienaads 
; TeST es 


MoV #25, TSTNO 
MOY #TST26, NEXT 


#BIT11, (R1) 
#12,Re 
ISR PC, SYNC 


#BIT11, (RL) 
#12, Re 
JSR PC, SYNC 


p RRRRKARARAERAREREAKERRRKREK TEST 27 2RKRERRREARRERRRRARRARERERE 





















;R1 CONTAINS BASE DMC11 ADDRESS 
sMASTER CLEAR DMC11 


LOOP 
Save” Lu REG FOR TYPEOUT 
:SINGLE CLOCK 5 SYNC CHARACTERS 


pearea IS INSTRUCTION, ROMCLK PC=$304 

“PUT “FOUND” IN 

: CLEAR UNMANTED Bt TS 
"EXPECTED" IN RS 

:IS acraie SET? 

:BR IF ¥ 


: ERROR ACTIVE IS NOT SET 
:SCOPE THIS TEST 




















:R1 CONTAINS BASE pci ADDRESS 
sMASTER CLEAR DMC11 

i SAve LU REG FORT YPEQUT 
:SINGLE CLOCK 1 SYNC CHARACTERS 


;NEXT “thi IS INSTRUCTION, ROMCLK PC=5304 
+e 


ERROR ACTIVE IS NOT CLEAR 
:SCOPE THIS TEST 





OOO VOVOVOVOOVOOOOOON0O 20 
0 bb 8 ho hs bh ee pepe he he 


bs+b-- 


Toro rorurorurorunvr= t= pot OO OOT 
NICU .£ WMO. 00 NUE OnM-OwW IE 
DOOVOKDODDD0D0D0000000 0 


¢(7de) 


012737 
012737 


10441e 


104400 


012737 
012737 


104412 


104040 
012761 
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BASIC RECEIVER TESTS 


000027 


015560 


004000 
000012 
026162 


000034 


000004 
000277 
000100 


009029 
015732 


000012 
004000 
026330 


000053 
00008e 


000904 
000357 
000020 


001226 
001216 


200200 000004 
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TST27: 


1$: 


TST30: 


1$: 


i SeET L IN ACTIVE TEST 


T LU LOOP, 


ad THAT’ IN ACTIVE IS SET 
2 EEK RRER AKER EERE EERE ERASER LEER LEER LEENA EEE EEEREREE ESET EELS 


MSTCLR 
MOV 
MOV 
JSR 


lng ge 


since ier TEST 30 XXX4¥ XX HEEL H KEKE SELES LESS 
:¥SYNC UP RECEIVER AND en A CHARACTER 
: WAIT FOR IN RDY, THEN SET IN CLEAR 
bea THAT IN ACTIVE AND IN RDY ARE CLEARED 
£ EHH KKKKK KL KLEE REESE KAKA ERE KLEE HA EK EK KEELES ES RAE REESE SHEERS 





NOS. 





TEST e7 





#27, TSTNO 
#TST30, NEXT 


#BIT11, (RL) 
#12,Re° 
Bos SYNC 





; TEST 30 

ACV #30, TSTNO 
MOV #TST31, NEXT 
METC 

MCV #12,R2 

MOV eBIT11, (RL) 
IS2 PC, CHAR 
39! 

DATACLK, 53 
TIMER 

ROMCLK 

Q212e4 

MOV 4(R1),R4 
BIC 357, 

MOV #BIT4,RS 
CMPB SRY 

BEG 

HLT 40 

MOV 8BIT7,4(R1) 








SINGLE STEP 2 SYNCS ANC A NON-SYNC (301) 


1 CONTAINS aed * ar ADDRESS 


SET 
;SAVE LU REG FOR TYPEOUT 
SINGLE CLOCK 2 SYNC CHARACTERS 


423m WORD IS wpttestjct ROMCLK PC=S304 
;PO 4eLUle 


D” IN 
; CLEAR UNHANTED tr S 
1S active” gets 


YES 
TERROR ACTIVE IS NOT SET 
:SCOPE THIS TEST 


“EXPECTED” IN RS 


ind SOTA weed M nase ADDRESS 
AVE REG” ADDRESS 3" R2 FOR TYPEOUT 


SINGLE Bog et THE DATA 
sNEXT HRD IS INSTRUCTION, ROMCLK PC=S304 


‘CLEAR vette BITS 
geree TE" IN RS 


son. INRDY IS NOT SET 








BO6 





BAS! 
sie3 015860 104414 ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
gig0 015662 122112 122112 ;SET_IN CLEAR wok rs 
313i Q15884% i04414 MCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
sise O15586 021244 021244 sPORTYeLU 12 
sis2 915€70 Q16104 OCOd04 MOV 4¥(R1),R4 ;PUT “FOUND” IN RY 
siss 015674 O4e704 O00e77 BIC ge77 RY ;CLEAR UNWANTED SITS 
3i3S 915700 O0S005 CLR RS sPUT “EXPECTED” IN RS 
sist QO1S702e 120504 CMeB RS,R4 IS IN ACTIVE CLEAR? 
sig: 015704 00140) BEQ es : ae 
aig =i3i08 10404) , HLT 40 ERROR, IN ACTIVE IS NOT CLEARS 
‘39 ‘abl -ws) 2 : 

2240 QO15710 918104 000004 MOV 4oR1) 84 sPUT “FOUND” IN R4 
sisi O157i4 O42704 O0O3s7 BIC #25784 s;CLEAR UNWANTED BITS 
3ite 015720 05005 CLR RS ;PUT “EXPECTED” IN RS 
ei83 Q1S722 120504 CMPS RS,R4 sIS INROY CLEARED? 
sits 018724 00140] SEO 3$ ” S 
Si4S OL5726 Loscss ALT 40 ERROR, INRDY IS NOT CLE@RED 
S248 015730 104400 38: SCOPE ;SCOPE THIS TEST 
2148 
318s ,Reeeeeesesseeseaessaseesesee TEST O] ae veceteesseeeeteseestsses se 
3150 :#DOCMP BASIC RECEICER TEST 
315; :#SYNC_UP_ RECEIVER AND SINGLE Boek THE CHSRACTER 0 
ise :*#VERIFY THRT IN RDY IS SET, AND THAT THE CHARRBCTER was RECEIVED 
| sis2 SL PRREERRESE SERA SESSA SHAE LESSELSLSSSSEALSSAASHSESAFL ALE F EEE AEL EF 
3154 
2isS ; TEST 31 
| 2i87 018732 Ole737 000031 Oo01226 TS731: MOV 831, TSTNO 
3158 S15745 Slé7s7. 3ies46 O1z16 MOV aTSt32, NEXT . ep 2 
2153 :R1 CONTAINS SASE DMCL1L ADDSESS 
3160 OLST4s 1O4412 MSTCLR ;MASTER CLEAR OMC11 — & 
| 3363 GiS750 Qle702 O009le2 MOV #i2,82 :SAVE REG ADDRESS IN 82 FOR TYPEOUT 
| gl6e O6:5758% 012711 904000 MOV s8IT11, (RL) ;SET LINE UNIT LOOP 
| 2363 015760 004737 O2e6s30 JSR PC. CHAR ;LOAD SILO WITH 3 SYNCS 
siéss S1i5764 900000 :AND THE CHARACTER 0 
| Si€5 DiE7e_ IoMMis 00053 DATACLK, 53 SSINGLE CLOCK THE DATA 
| 266 O15772 104416 000002 TIMER, 2 ;WAIT FOR INRDY > 
| 2187 Qi5778 idssis ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
| 2:88 Qi6000 Oele44 021244 . sPORTYeLU 12 
3:83 01600e 016104 00004 MOV 4(81) RY ;PUT “FOUND” IN RY 
| 3370 Q16006 O4%e70% 000397 .. BIC 8357, R4 ;CLEAR UNWANTED BITS 
| 3272 QO1601e O1e705 O0000e0 MOV eSIT4,85 :PUT “EXPECTED” IN §5 
| 3t7¢ Q18016 120504 CMPS RS ,R4 ;IS INRDY SET? 
| 2173 916020 O01401 SEG 1$ ag we 
| 3174 Ql160¢2e 04040 HLT 40 sERROR, INRDY IS NOT SET 
| 2i78 026086 1$§: 
| 2176 Ciédes 104414 ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PCsS30S 
, gi77 O16026 Qel204 021204 :PORTYeIN DATA 
| 3178 036030 016104 ocodo4 MOV 4¥(R1),R4 sPUT “FOUND” IN RY 
' 3179 Q16034 005005 - : CLR ae ;PUT “EXPECTED” IN AS 
| 23380 Q18936 120504 CMPB RS,R4 WAS AO RECEIVED? 
| 238: Q16040 900140} BEQ 23 , 
3:82 ClsO4e 104010 RUT 10 ERROR, RECEIVED DATA IS WRONG 
ifs ClEDSS 104450 es: SCOPE :SCOPE THIS TEST 
2184 
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5 PHRERERRAERSERERE RSE SESERSS TEST 32 FARE P ESS EEF e et SESS ss ss tsetse 
;®DOCMP BASIC RECEICER TEST _ . 

:*#SYNC_UP_ RECEIVER AND SINGLE CLOCK THE CHPRACTER 125 

:eVERIFY THAT IN RDY IS SET, AND THAT THE CHARACTER WAS RECEIVED 
5 ERERRRRERPES EAS SLE PAA LEL ESSE SE SESE SEL ASAD FEES FFE FESS FSSSFE SE S4E 


: TEST 32 
hoy #32, TSTNO 
MOV 875133, NEXT 
> sR1 CONTAINS BASE DMC11 ADORESS 
MSTCLR :MASTER CLEAR OMCL1 
MOV 812, R2 :SAVE REG ADDRESS IN R2 FOR TYPEOUT 
MOV eSItii, (RL) :SET LINE UNIT LOOP 
ISR Pe CHAR :LOAD SILO WITH 3 SYNCS 
125 [AND THE CHARACTER 125 
BATACLK, 3 :SINGLE CLOCK THE DATA 
TIMER, ‘2 :WAIT FOR INRDY 
ROMCLK sNEXT WORD IS INSTRUCTION, SOMCLEK FC=5304 
021244 :PORT4+LU 13 
MOV 4(R1) RY :PUT "FOUND" IN RY 
BIC 8357, A4 CLEAR UNWANTED BITS 
MOV #BIT4 85 sPU? “EXPECTED” IN RS 
CMPQ) RS, RY sIS INROY S&T? 
5&9 13 
HLT 49 sERROR, INRDY IS NOT SET 
ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
021204 -PORTH*IN DATA | 
MOY 4(R1). RY “PUT “FOUND” IN RY 
MOV gles, RS PUT “EXPECTED™ IN RS 
CMPB RS RS :WAS 8 125 RECEIVED? 
REG 23 
HLT 10 sERROR, RECEIVED DATA IS WRONG 
SCOPE “SCOPE THIS TEST 


-#VERIFY THAT IN ROY IS SET. AND THAT THE CHARACTER WAS RECEIVED 
23 SERESLRLASSSAAHSSSSTSSSSSLRESRSASERLSSESLSSLSLSELESSSASSLSLRTASTA 
; TEST 33 
MOV #32, TSTNO 
MOV 87535, NEXT. 
:R1 CONTAINS BASE DMCLL ADDRESS 
MSTCLR :MASTER CLEAR DMC11 
MOV #12,R2 :SAVE REG ADDRESS IN R2 FOR TYPEOUT 
MOV wSITit, (RL) :SET LINE UNIT LOOP 
JSR PC, CHAR :LOAD SILO WITH 3 SYNCS 
252 :AND THE CHARACTER 252 
DATACLK, 53 :SINGLE CLOCK THE DATA 
TIMER, ‘2 “WAIT FOR INRDY 
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ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=520 
021244 ;PORTYeLU 12 

MOV 4(RL) RY -PUT “FOUND IN RY 

BIC #357, a4 :CLEAR UNWANTED BITS 

MOV 8B1T4,RS -PUT “EXPECTED” IN RS 

CMPB RS, R4 -IS INRDY SET” 

BEQ 13 : 

HLT 40 sERROR, INRDY IS NOT SET 

ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC¢=S304 
Ne1204 - PORTH+IN DATA 

MOV. 4€R1).R4 :PUT "FOUND" IN R4 

MOV 82525 :PUT "EXPECTED" IN RS 

chee BeAr :WAS A 252 RECEIVED? 

HLT 10 sERROR, RECEIVED DATA IS WRONG 

SCOPE -SCOPE THIS TEST 


pRRRSASERSRR RSS ESHER RRESS TEST 34 seeeeee esse sesessseeeesssss 
;#DDCMP BASIC RECEICER TEST 

;#SYNC_UP RECEIVER AND SINGLE CLOCK THE CHARACTER 377 — 

s#VERIFY THAT IN RDY IS SET, AND THAT THE CHARRCTES WAS RECEIVED 
5 RARER EREREEE EES EE ESE EERE SE EERE EERE ESSA EE EF EEE SESSA FT EE EEE EES 


; TEST 34 


Moy 834. TSTNO 
MOV s7St35 NEXT 
sR1 CONTAINS SASE OMCLL ADDRESS 

MSTCLR :MASTER CLEAR DMCL! 
MOV 812, R2 :SAVE REG ADDRESS IN R2 FOR TYPEOUT 
MOV eSItii, (RL) SET LINE UNIT LOOP _ 
ws Po, CHAR :LOAD SILO WITH 2 SYNCS 

7 :AND THE CHARACTER 377 
DATACLK, $3 *SINGLE CLOCK THE DATA 
TIMER, ‘2 :WAIT FOR INRDY 
ROMCLE :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
O21e44 :PORTH+LU 13 
MOV 4CRL),R4 :PUT “FOUND™ IN RY 
Sic #357 RY *CLEAR UNWANTED BITS 
MOV 8874S, R5 -PLUT “EXPECTED” IN RS 
CMPB RoR :IS INRDY SET? 
HLT 40 sERROR, INRDY IS NOT SET 
ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
021204 :PORTH¢IN DATA 
MOV W(RL), RY :PUT “FOUND™ IN RY 
MOV 8377 RS -PUT “EXPECTED” IN RS 
CMPB RE. RY “WAS A 37? RECEIVED? 
BE 23 . .- 
HLT 10 ERROR, RECEIVED DATA IS KRONG 
SCOPE SCOPE THIS TES 












fa betel ‘Ta 


nt ooh “ 
DIOMES.F 


GICIGIGIGIGIGIGIOIGIGICIGIGITU 
0-+ 0—* b-* b= b-< b= b= -2 -- € CC IC CIC I JI WD 


mot ot Oo mt ep IGIGIGICIGIGIGIGIGIGIGIGIGIGIGS 
(9.00 IWU1.6 GUO. IU 6 Oto O.0m 


NOIGIGIGIGI 


322 


GIGIGS 


—— 


GID 


Brat at cited ot 


It) 


LOCOCO GICUOI OIG) 





reST 13:18 PAGE 70 


at iteeey a 
“Turn 
IO 


OOOO YVVIOAIAAIOVOVOOVOIOVYHAOoOoOO wo 
a 
LoL 


‘ 
cna 
- -£ JO) 


Oooo oo 


E06 





we manheC TEST 35 4444 F FEF FFs RFS SF 44 FFs asses 


° oo D 
See ere Tae steps a BINGRY COUNT PATTERN 
i SCHECKING EACH CHARACTER AS IT 1S RECEIVEC 
+ EEREEE KEKE EEEAE EEF EERE EER EEL ES EEEDSESEEEESESEEEEFEEEFSE EEE SS 


; TEST 35 
Mov #35, TSTNO 
MOV #75136, NEXT 

RI 1 CONTAINS BASE OMC11 ADDRESS 


MSTCLR :MASTER CLEA 

cLR SCHAR :START BINARY COUNT AT ZERO 

éLR STUFLG -CLEAR BITSTU 

¢ :R2 IS “EXPECTED” 

MOV #73, R23 -R3 IS CHARACTER COUNT 

MOV aBIT11, (RL) ;SET LINE UNIT LOOP 

JSR PC, SILOLD :LOAD SILO WITH COUNT PATTERN 
DATACLK, 43 SYNC RECEIVER AND GET IT ACTIVE 
DATACLK., :CLOCK IN 73 CHARACTERS 

JSR , INRDY :WAIT FOR INRDY 

ROMCLK :NEXT WORD Is INSTRUCTION, ROMCLK PC=S304 
921204 ;PORTY+IN 

MOV 4(R1),R4 :PUT “FE Noe ON 

MOV Re RS :PUT “EXPECTED” iN RS 

CMPE «RS RY -I5 DATA CORRECT? 

BEQ 2 :BR IF YES 

HLT 10 :DATA ERRO 

INC Re :NEXT CHARACTER 

CMP #4C0,R2 : ONE? 

BEQ 33 :BR IF YES 

DES 3 :DECREMENT CHARACTER COUNT 

SNE ot :BR IF SILO NOT EMPTY 

JSR PC SILOLD :LOAD SILO WITH MORE OF COUNT PATTERN 
MOV 873, R3 ;RELOAD SHORACTER COUNT 

BR 1$ INUE 

SCOPE SCOPE THIS TEST 


s RERRESRERARAERAARARRAAAARAR TEST J eeeeeee ede eer seeeeseeereere 
:*DDCMP DATA TEST 
:*THIS TEST SINGLE STEPS A BINARY COUNT PATTERN 
s#CHECKING EACH CHARACTER AS IT IS RECEIVED 
!#THIS TEST IS EXACTL’ THE SAME RS THE LAST TEST, 
;#EXCEPT LINE UNIT LOOP IS SET IN LU REGI STER le 
+ RRERHRERESRERRERAAARRAEEEARRASRARAL AR ERA SER RALAAARAERELER ES 


; TEST 3% 
MoV #36, TSTNO 
MOV #75137 NEXT 
:R1 CONTAINS $ORSE DMCLL ADDRESS 


MSTCLR MASTER CLEAR f 
CLR SCHAR ;START BINARY SUNT AT ZERO 
¢cR STUFLG CLEAR BITSTUFE FLAG 

CLR sR sR IS "EXPECTED" DATA 


ooo 


FO6 


OZOME MACY11 27(732)_ 22-SEP-7& 13:18 PAGE 71 
DZOMER. P11 C RECEIVER TESTS 








353 218600 212708 oo007 Hoy a3, R2 89 1s CHARACTER COUNT | a 
: a Ri EERE ens g00042 090004 vet Bite 4(RL) iro Ee pbeTh 
3355 O16514 104414 ROMCLK NET HOR Is INSTRUCTION, ROMCLK PC=5204 
3357 O1Stlg ees 122] SET LU LOOP IN LU REG i2 
asso O18620 COW"? oeesoE ISR PC, SILOLD : LOAD Bt5° ITH COUNT PATTERN 
3359 ieee 10442 0043 DATACLK, 4 SYNC ah EIVER atio 0 SET IT ACTIVE 
3366 O1s630 1044! sletape 1$: BATACLK’ ? N CTERS 
3361 916634 Oo4737 026752 a3: JSR. PC, INROY ‘Mat FOR INRNY te 
3365 O1e640 154414 ROMCLK NEXT WORD 13 INSTRUCTION, ROMCLK PC=5204 
3363 16642 021204 21204 sPORTYCIN DAT 
3364 SO16644 316104 O00004 mov 4(RL) RY sPUT “OUND” IN 
3365 16850 810205 MOV Re RS T "EXPECTED" fh RS 
2366 616652 120504 CMPB) RE RY ty DATA CORRECT? 
3367 916554 001401 BEQ 25 BR IF YES 
3368 016558 104010 HLT 10 :DATA ERROR i; 
2369 O16660 O0Sed2 23: INC R2 :NEXT, CHARACTER 
3370 Ol6e62 Oezrde o00400 emp #400, R2 SAL _DONE? 
3371 16865 001407. BEG 33 BR IF YES 
3372 016670 99530 DEC R3 : DECREMENT CHARACTER COUNT 
3373 O16672 901360 BNE ug !BR IF SILO NOT EM 
3374 O1S675 04737 oEsos JSR PC SILOLD ‘LOAD SILO WITH SORE OF COUNT PATTERN 
3375 016700 Ol2702 00073 MOV 74°83 ;RELOAD CHARACTER COUNT 
3376 O1e704 OCO7E] BR 18 : CONTINUE 
3577 O1s7os 1o44d0 28: SCOPE :SCOPE THIS TEST 


30co™ 


s RELLALAFAAAAAARRSERSRERAASS TEST 37 cease eee eeeessseesesecesesee 
: TRANSMITTER MARK 


tat at tat a 


Bee SRReSR?eS salou se ~— 


3381 TEST 
2322 ; #SINGLE CLOCK 3 SYNCS BNO A 301 AND 20 EXTRA 
3383 :*#CLOCK TICKS, VERIFY THAT A 301, A 377 AND A 377 
3254 ; #HERE gecesVeo NE TOATING THAT hee TRANSMITTER WENT 
3365 #70 A MARK STATE FOR 16 BITS WHEN OUT SILO WAS EMPTY 
| 2: & NS aaennaatanamennmaitcticlsietastimtitieielensaeiidinans 
| 3396 ; TEST 37 
3285 jeeenn--------- 
3359 OLE710 12737 000037 ool1226 TST37: MOV #37, TSTNO 
| 2351 O16716 012737 017050 001216 MOV 87ST4O, NEXT me on 
| 3392 ;R1 CONTAINS BASE DMC11 ADDRESS 
| 3293 O18724 104412 MSTCLR :MASTER CLEAR DMC) 
3334 D1é7e6 12711 904000 MOV SBITL1, (RL) :SET LINE UNIT 538 
3395 016732 004737 026330 JSR PC, CHAR ; LORD $140 “WITH 3 SYNCS 
3295 016736 000 1 391 ND 
3397 516740 104415 900073 DATACLK, 73 CLOCK fhe 301 IN AND 20 EXTRA TICKS 
3398 O18744 004737 926752 JSR PC, INRDY ;WALT FOR 
3399 016750 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
3400 O16752 021204 021204 ;PORTY IN DATA 
| 3401 O16754 O16104 900004 MOV 4(R1),RY4 : PUT " IN RY 
| S402 O16760 012705 000301 MOV #301 ,R5 :PUT mEXPECTED™ IN RS 
2403 O16764 120594 CMPB RS RY :WAS © 301 RECEIVED? 
| 3404 O16766 O01401 BE 1§ ; 
| 3395 016770 104010 HLT 10 ;ERROR FIRST CHARACTER INCORRECT 
| 405 Q16772 004737 026752 1S: JSR PC, INRDY sHAIT FO 9 
3407 OLE77E 1O4414 ROMCLK :NEXT WORD 1S. INSTRUCTION, ROMCLK PC=S5304 
} 3408 017000 021204 021204 ;PORTH*IN DAT 
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TESTS 


GO6 


MOV 4(R1) RY 
MOV 9377, RS 
cM8B RS, RY 
BEQ $ 

“s HLT 10 

23: ISR FC, INRDY 

-  ROMCLK 
021204 
MOV 4(R1) RY 
MOV #377, RS 
CMPB | RSR4 
BEG 33 
HLT 10 

33: SCOPE 


g RHRRESAAAF FRA SRERERESAARARE TEST YQ Fee eee ete e ete ze eee etessssse 
:;®CABLE TURNAROUND TEST 

s¥CLEAR LINE UNIT LOOP 
:*¥VERIFY THAT RING AND 
:*#CLEAR DTR, VERIFY THAT RING OND MRDY ARE CLEARED 

5 RRA PARELALEE SHES ERE E AERA EAR ER REE EE SEES ERE ELSA SEE FS SELES EERE SE 


: TEST 40 

TST4HO: MOV #40, TSTNO 
MOV aTST41 NEXT 
MSTCLR 

IT #8IT13,STATL 

BNE tle 
BIT BBITL4,STATL 
BEG 23 
CLR (RL) 
MOV 8100, 4(R1) 
ROMCLK 
122113 
IMER, 2 
ROMCLK 
021264 
MOV 4(R1) RY 
BIC 823, R4 
MOV #310,R5 
BIT #BIT13, STAT! 
960 +5 
BIC #BIT7.RS 
CMPB ORS, R4 
BEQ 1g 
HLT 1 

1$: CLR 4(R1) 
ROMCLK 
122113 
TIMER, 2 
ROMCLE 
021264 
MOV 4(RL), RY 





» SET DTR 
MODEM READY ARE SET 






;PUT “FOUND” IN RY 
;PUT “EXPECTED” IN RS 
;WAS A 377 RECEIVED? 


sERROR, 377 WAS NOT RECEIVED 
‘WAIT FOR INRDY 
=NEXT WORD IS. INSTRUCTION, ROMCLK PC=S304 
;PORTH+IN DATA 


seul IN RY 
;PUT “EXPECTED” IN RS 
;WAS A 377 RECEIVED? 


sERROR, 177 WAS NOT RECEIVED 
;SCOPE THIS TEST 












NTAINS BASE DMC11 ADDRESS 
CLEAR DMC11 

YES (D0 TEST EVEN 
URNAROUND CONNECTOR 
KIP_ TEST IF NO 
:CLEAR LINE UNIT LOOP 
;LOAD PORTY 
$ReXT no TS INSTRUCTION, ROMCLK PC=S304 


IF NC LOOP-BACK CONN) 
ON? 


sWAIT 
;NEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
sPORTY*LU1 


S 
31S LINE UNIT M8202? 
;BR IF NO 


:NO_RING ON M@202 
ARE RING AND MRDY SET? 


;ERROR, RING OR MRDY NOT SET 

;CLEAR PORTY 

sNEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
;CLEAR OTR 


;NEXT WORD_IS INSTRUCTION, ROMCLK PC=53C04 
;PORTYeLUL3 
;PUT “FOUND” IN RY 
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CLEAR UNWANTED 8175 


ON M8202 
‘ARE RING AND MRDY CLEAR? 


;ERROR, RING OR MROY NOT CLEAR 
SCOPE THIS TEST 





s PRSSRALAREHA PSR RE REHERE TEST 4! EET TET TTP eTT ETE TT TTT Ter Te 
:*#CABLE TURNAROUND TEST 


: *CLEAR l 


LINE_UNIT LOOP, LOAD OUT DATA SILO 


:#VER RIFY THAT ALL MODEM SIGNALS ARE SET 
+ EEEERREEE EERE ESSERE RE RRREEEEREEES ERE AEE ELES EEE LEELA EE EERE SE EEE 





TST41: Mov 


-----— ——— _— 


Rh tlh ps Rs BASE DMC11 ADDRESS 


YES (D0 TEST ‘EVEN Rn NO LOOP<BACK CONN) 
Teas. CONNECTOR 


INSTRUCT ION, ROMCLK PC=5304 
igh aL Baars SIGNALS, tyceey p OTR 


i, ROMCLK PCsS$304 


Nex! ORD IS INSTRUCT’ 
;SET SOM 


oF dbl OUT DATA SILO 
;WITH 64 CHARAC TERS 


;PREPARE FOR DELAY 
sCLEAR LINE UNIT LOO 


;NEXT WORD_IS INSTRUCTION, ROMCLK PO=S3C4 

:PORTH+LU13 

CLEAR UNWANTED ar3 
“EXPECTED” IN R 


RING ON M8202 
ee EXPECTED AND FOUNC 
BEC a COUNT 
ye 


NALS RARE NOT SET 





a ase 
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517464 
49 O17472 
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3543 817504 
3543 017510 
sS4s O17S!le2 
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3551 017535 
Seq 01745 
| 3555 O17550 
| 356 017552 
| S222 Bi7556 
| -3eg Bt Sees 
| 3560 8i756e 
| 3581 Ol75e6 
| 3565 17574 
ee 
| 3s 
| 3565 81760 
| 35e— 6176 
| 3567 9176 
| 362 017620 
| 3565 017626 
| 3570 017634 
| 3253 BIde 
V4 
| 3573 017 
3675 617 
3575 (017 
3676 O17 
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64s: 


106 


ret eae eT TEST YD Hanne nesnse essa cases sassees 


#7 eR OF 


VERIFY THE LSB OF THE BCC ON 
est TRANSMITTER FIRST THEN THE RECEIVER bee 


S SRSLESSRELLE FS SLERELEFFRFALAFFF LEAL AF LA LEFF FEL ESFLELSA LESS FASS 





oA OPERATION 
ENG THE ERCIE FOL SNOMIAL SINGLE CLOCK THE CHARACTER 





; TEST 42 
Mov #42, TSTNO 
‘le #TST43 NEXT 
MOV 864$, LACK —_— 
Ri ey Eres BASE OMicl1 ADDRESS 
MSTCL iN SER CLEAR 0 
Moy sOIT il (RL) a 
ISR PC, CLATO Me ace REGISTERS 
oLR RO ;START SHIFT COUNTER AT ZERO 
MOV #cRC 16, XPOLY LOAD POLYNOMIAL FOR SOFTWARE SCC 
MOV a0 565 SLOAD_CHAR FOR SOFTWARE BCC 
CLR :CLEAR OLD SOFTWARE BCC 
JSR PC, BCCLD LORD OUT sit9 WITH 2 SYNCS 
0 . AND THE CHARACTER 0 
DATACLK, 21 :GET TRANSMITTER ACTIVE 
DATACLK. 1 ; SHIFT BCC ONCE 
INC Pe :BUMP SHIFT COUNT —_- 
SR RS, SIMBCC SaLCuLaTe SOFTWARE 8CC LSB 
5 ;DATA CHARACTER 
7 OLD BCC 4 
BCS o2$ :BR IF SOFT SCC LSB IS SET 
JSR FC GETQO !GET HARDWARE TRANSMITTER "acc Lss 
Bec 63s BRIE He BCC 43815 CLEAR 
HLT 12 :ERPOR, 8CC LSB IS SET 
BR 63$ CONT Ty 
ISR PC. GETGO :GET AREWARE TRANSMITTER BCC LSE 
ees 938 ;8R IF HARD BCC LS8 Is SET 
HLT 16 ERROR, HARD BCC LSS Is CLEAR 
ROR a ;SHIFT SOFT DATA 
MOV caLece. S7$ 26D OLD SOFT BCC 
CMP 815, RO 50 evel 
BNE 653 BR IF iiOT DONE 
SCOP) :5C0 Ss SUBTEST (SWO9=1) 
MOV 8718, LOCK :NEW SCOPE! 
JSR Pc CLRIO :CLEAR BCC REGISTERS 
CLR RO sSTART SHIFT COUNTER AT ZERO 
MOV BCRC1S, XPOLY LOA POLYNOMIAL FOR SOFTWARE Scc 
MOV 80,738 LORD CHAR FOR SOF RE BCC 
CLR 74g ie EAR OLD SOFT nes 
JSR PC, BCCLD LOAD OUT STLO are SYNCS 
0 SAND THE CHARAC 
DATACLK. 32 ;GET RECEIVER SFive 
DATACLK 1 :SHIFT BCC ONCE 
INC sBUNP SHIFT COUNT 
JSR 3. SIMBCC PEALCULATE SOFTWARE BCC LSB 
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RECEIVER TESTS 


738: 
748: 


738: 


77s: 
?¢ . 


TST43: 


643: 


68$: 


——-—- — — --- 


40 CW *.~.Dono- 
IN A Oona 
ID YO wWN 


Bye ge tt ea TEST YO eee eeetee ests ease seesssssse 


3$ 
CALBCC,74$ 
#10,£0 


f 


;2TEST OF CRC OPERA 


:#377 


; TEST 


43 


TSTNO 
eretye. NEXT 
864$, LOCK 


sBi711, (RL) 
PC. cLAtO 
RO 


#CRC16, XPOLY 


377,855; 

PC, BCCLD 
21 
! 


ku 
RS,SIMBCC 


; 

















ONE SHIFT 
ibata - is 


ie IF SOFT BCC LS 
i. T HARDWARE a 


Fracr, ect se res 


SHIFT SOFT DATA 
;LOAC 8, SOFT BCC 


NE_Y 
BR IF NOT 
: SCOPE 5 a 


DONE 
EST ‘SwO9=1) 
sSCOPE THIS TEST 


+r 
| 

¢ 

~ 


TION 
: #USING THE le POLYNOMIAL, ee CLOCK ef CHARACTER 
QF THE BCC ON EACH SHIFT 


VERIFY THE LSE 
jaTect TRANSMITTER FIRST THEN THE RECEIVER BCC 
SHE FERARRELELARELREA EELFRAPSELRRLLEELERSSLELSEALSE SSS LEAT ESAS LE SE 


;R1 CONTAINS BASE DMCil ADDRESS 
:MASTER CLEAR DIC11 

;SET LUL 

CLEAR BCC Reis re 


NO T ARACTER 377 
{CET TRANSMITTER ACTIVE 
SHIFT BCC ONCE 

BUMP SHIF 6 NT 

srCuL ATE SOF TWARE BCC LSB j 
:DATA CHARACTER Pd 


;BR IF SOFT BCC LSB IS SET 

; GET pre TRANSMITTER BCC LSB 
BR IF HARD BCC LSB BF © LERR 

; ERROR "ce iG: Is 5 


; CONTINUE 
ET HARDWARE TRANSNITTER 8¢c LSB 
;6R IF HARD BCC LSB IS SET 





MACYLL 27 (732) 
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027114 





000032 
000001 


027004 








027240 





027240 





Oe0e0e 
Oe71le 
000019 














000044 

020572 

020306 
/ 


004000 
027454 











;ERROR, HARD BCC LSB IS CLEAR 


;SHIFT SOFT DATA 
: LOAD OLO SOFT BCC 
: DONE yah 


;BR IF NOT DONE 
aOre SUBTEST (SWO9=1) 
sae 


NTER AT ZERO 
ia POL YNONTAL FOR SOFTWARE 8CC 
SOFTWARE BCC 


: BUMP iF IFT COUNT 
:CALCULATE SOFTWARE 8CC LSB 


ONE SHIFT 

:DATA_ CHARACTER 

;O0LD BCC 

:BR_IF SOFT BCC LSB IS SET 

GET HARDWARE RECEIVER ae LSB 
;BR IF HARD 

s ERROR a LSB IS 
| RECEIVER BCC LSB 


F HARD BCC LSB IS SET 
ERROR, BCC LSB IS CLEAR 





; SHIFT SOFT DATA 
;LOAD OLD | SOFT BCC 
SON Rs 


;BR IF NOT DONE 
; SCOPE SUBTEST (SWO9=1) 
:SCOPE THIS TEST 
Feet gp tg lan TEST YY 2RRERRARRAAARA RAL ARERR ERE 
ey? ae THE CRC16 tea ed SINGLE ae THE CHARACTER 
FY THE LSB OF THE BCC H SHIFT 


I 
Bt TRANSMITTER FIRST THEN THE RECEIVER BCC 
Ps eee err eer POUT PPE Tere OE eT eUEt tT Peer tt ET ee ee Tee ET TT eT TT 


Rt a ee BASE DMNC11 ADDRESS 
ST LEAR DMC11 


EGIST 
QU NFER AT ZERO 









ZOME 
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020314 


nSae70 


012737 


104016 
006037 


104017 
006037 


104400 
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120001 027110 
000125 O2036e 
364 


114 


000021 
000001 


027004 


027226 
O27e26 


020362 
027112 


0900 


10 


o2044e 
627454 


120001 


0271 


14 


000032 
009001 


027004 


027240 


020364 


001220 


027110 


020516 


020520 


sss: 


66S: 
67$: 


68$: 


695: 


718: 


723: 


738: 
74S: 


758: 


768: 





LO6 





MOV CRC1b, XPOLY 3LOAD POLYNOMIAL FOR oe bee BCC 


MOV #125, 665: “LOAD CHAR FOR SOF TH 
CL 675 ‘CLEAR OLD SOF THARE WoCe 

ISR PC,BCCLD sLOAD OUT SIL 0 WITH 2 SYNCS 

125 THE CHARACTER 125 

DATACLK, 21 ie TRANSMITTER ACTIVE 

DATACLK: 1 :SHIFT BCC ONCE 

IN :BLMP SHIFT COUNT 

ISR RS, SIMBCC eC aTe SOF THARE Bcc LSB 

: sale CHARACTER 

Bcs 68S :BR IF SOFT BCC LSB IS SET 

JSR PC GETOQO “GET HARDWARE TRANSMITTER BCC LSB 
BCC 69$ *BR IF HARD BCC LSB IS CLEAR 

HLT 12 ‘ERROR, BCC LSB IS SET 

BR 693 : CONTINUE z 
ISR Pé GETQO -GET HARDWARE TRANSMITTER ECC LSB 
BCS 69$ :BR IF HARD BCC LSB IS SET 

HLT 16 ‘ERROR, HARD SCC LSB IS CLEAR 
ROR ES ;SHIFT SOFT DATA 

MOV CALBCC,67$ LOAD OLD SOFT BCC 

CMP #10,R0° DON E YET? 

BNE o§$ :BR IF NOT DONE 

SCOP1 :SCOPE SUBTEST (SWO9=1) 

MOV #71$,L0> NEW SCOPE1 

JSR PC, C810 ;CLEAR BCC REGISTERS 

CLR 9 :START SHIFT COUNTER AT ZERO 

MOY #CRCIE,XPOLY | :LOAD POLYNOMIAL FOR SOFTWARE SCC 
MOV 125,735; ‘LOAD CHAR FOR SOFTWARE BCC 

CLR 74$ :CLEAR OLD SOFTWARE BCC 

JSR PC, BCCLD *LOAD OUT SILO WITH 2 SYNCS 

125 ZAND THE CHARACTER 125 

DATACLK, 32 :GET RECEIVER ACTIVE 

DATACLK; 1 ;SHIFT BCC ONce 

INC RO :BUMP SHIFT COUNT 

ISR RS, SIMBCC CALCULATE SOFTWARE BCC LSB 

0 ;DATA CHARACTER 


Q 

BCS 75$ OR IF SOFT 8CC LSB IS SET 
:GET sgt y RECEIVER BCC LSE 
BR IF HARD BCC LSB IS CLEAR 
HLT 13 inne Ye LSB IS set 


BR 76S CON 
JSR PC GETQI ;GET HARDWARE RECEIVER BCC LSB 
BCS 76$ :BR IF HARD BCC LSB IS SET 

HLT 1? :ERROR, BCC LSB IS CLEAR 

ROR 735 :SHIFT SOFT DATA 

MOV CALB7C, 74S sLORD OLD SOFT BCC 

CMP #10,R0 ;DON E YET? 

BNE 725 :BR IF NOT DONE 

SCOP! :SCOPE SUBTEST (SWO9=1) 


:SCOPE THIS TEST 












MOQ6 
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3747 g RAKE AAKKKA KEKE RE RERRELEEES TEST YS R#RRRR HAH ERE FLARES LELSLES 
3748  ¥TEST of CRC_OPERATION 
3743 >¥USING THE i tea ce te? as CLOCK ne CHARACTER 
3759 ;*2S2, VERIFY THE LSB OF THE "BCC 0 N EACH SHIFT 
372 isTest TRANSMITTER FIRST THEN THE RECEIVER 8CC 
7 5 HEHE KK EKER KALE KKK A KESSEL EE ELLE EELS EEE E EAE REESE EEE FEES EFEAL ESSE 






3754 ; TEST 45 















3756 020572 Qle737 OO0O4S O0i2e6 TSTYS: MOV #45, TSTNO 
375? O20600 Ole737 021106 O0lel6 MOV #TST46 NEXT 
3758 020606 Ol2737 Oe0bee 001220 MOV #64, LOCK 
3759 ;R1 CONTAINS BASE DMC11 ADDRESS 
3760 0206514 104412 - MSTCLR :MBSTER CLEAR DMC11 
3761 020616 QOle711 004000 MOV #81711, (R1) ;SET LU LOOP 
3762 Qe0bee 904737 027454 548: JSR PC, CLRIO SereAR Mace REGISTERS 
3763 Qe06e& 005000 CLR RO :START SHIFT COUNTER AT ZERO 
3764 020630 Q12737 120001 027110 MOV #CRC16, XPOLY sLOAD POLYNOMIAL ay SOFTWARE BCC 
3765 020636 Q1e737 900eS2e 020676 MOV #252, 665; :LOAD CHAR FOR SOFTWARE BCC 
“$6 Oe0644 005037 020700 CLR 67$ ;CLEAR OLD SOFTW cc 
3767 O20650 004737 027114 JSR PC,8CCLD sLOA D_OUT SILO WITH 2 SYNCS 
3768 020654 OC02Se ese AND THE CHAR R 
3769 020656 104415 000021 DATACLK, el CET Mg Ul ACTIVE 
3770 9e0662 104415 000001 65§: DATACLK, 1 : SHIFT pe ONCE 
377i 020666 005200 INC RO BUMP SHIFT COUNT 
3772 020670 O04537 027004 JSR RS,SIMBCC :CALCULATE SOFTWARE BCC LSB 
3773 020674 900001 1 









ONE SHIF 
3774 020676 900000 b6$: 0 ;DATA ates 





















3775 020700 000000 67$§: 0 L 

3776 020702 103405 BCS 68$ :BR_IF SOFT BCC LSB IS SET 

3777 920704 004737 027226 JSR PC, GETQO :GET HARDWARE TRANSMITTER BCC LSB 
778 0e0710 103006 BCC i 78R IF HARD BCC LSB IS CLEAR 

3773 O2071e 104012 HLT le ;ERROR, BCC LSB IS S 

3780 020714 9000404 BR 69$ . :¢ UE 

3781 020716 004737 Oe7225 688: JSR PC, GETGO GET HARDWARE TRANSMITTER BCC LSB 
2782 Oe07ee 103401 BCS 69S :BR IF HARD BCC LSB IS SET 

3783 029724 104016 HLT 16 ERROR, HARD BCC LSB IS CLEAR 
3784 020726 69S: 

3785 020726 906037 020676 ROR 66$ ;SHIFT SOFT DATA 

3786 O20732 013737 Oe7lle 020700 MOV CALBCC,67§ LOAD OL0 port BCC 

3787 O20740 Qee700 000010 CMP #10,RO DONE YET? 

3788 020744 001346 BNE 65$ ;BR IF NOT DONE 

37829 920746 104401 SCOP 1 ; SCOPE SUBTEST (SWOS=1) 

2796 QO20750 QOle737 020756 001220 MOV #71$, LOCK COPE! 

3791 020756 004737 027454 718: JSR Pc, CLRIO ‘CLEAR BCC REGISTERS 

3792 Oe076e 005000 CLR START SHIFT COUNTER AT ZERO . 
3793 020764 O1e737 120001 027119 MOV #CRC16, XPOLY ;LOAD POLYNOMIAL FOR SOFTWARE BCC 
3794 020772 012737 O0O0eSe 021032 MOV =. #252, 735; ;LOAD CHAR FOR SOFTWARE 8CC 

3795 021000 005037 021034 CLR ;CLEAR OLD SOFTWARE BCC 

3796 021904 004737 027114 JSR PC,BCCLD ;LOAD OUT SILO WITH 2 SYNCS 

3737 021010 O0CeSe ;AND THE CHARACTER 252 






3 eSe 

3798 Oeidle 104415 000032 DATACLK, 32 :GET REL SAVER ACTIVE 

3799 O21016 104415 00001 72S: DATACLK, i SHIFT BCC ONCE 
INC RO :BUMP SHIFT COUNT 
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sSOFT SHIFT COUNT 






! 

a :50FT CHARGC TER 

0 ;OLD SCET 

Bes c$ :BR 1 SheF “bce LSE IS SET 

ISR PC GETQO GET HARDWARE TRANSMITTER 

BoC bg ;BRIE Ob CCL PaRED, 

HLT 20 ROR, BCC LSB LAS SET 

ch &$ EENTIAUE i H JES) fea P 
JSR PC, GETGO “oe! AROWARE TRGNSMITTZR BCC LS 
BCS 6$ :BRIF OK ( eT) 

HLT 2! VERROR, BCC LSB WAS CLEAR 

ROR 33 ;SHIFT SOFT DATA 

MOV CALBCC, 48 :L08_ OLD SOFT Cc 

NC R3 STNCREMENT BIT COUNTER 

one #10,R3 :DONE_A FULL CHARACTER YET? 

BNE 23 88 IF NO 

CLR = RESTART BIT af QUUTER 

INC 25 :INCREMENT DATA FOR SILO 

EMP 8400, R4 :DONE BINARY CUNT vET? 

BLE ors BRIE YES. 

MOY R44(R1) :PORT4*DAT 
ROMCLK ;NEXT iOro I$ INSTRUCTION, ROMSLK PO=S304 

STRCREMENT 

MP #400,RS GONE SINARY PATTERN YET? 
BNE 728 

SCOPE Ege tits TEST” 


eb-bab-b-boleh-b-tabpd-Slab-5-1-5-telelalalalalalale TEST SP Bee eaeeee eee seen sees eeeeens 
;#RECEIVER C C TEST 

2 #USING THE ERCLE PO SE INOMINAL fa OCK A BINARY 

: COUNT PATTERN, VERIF} THE LSS OF THE “RESE Seo 5c¢ ON ERCH SHIFT 


sR PEEESEEES EES ES ES SESEEREREERESESESEESESERESSSESERESRESSSSERER 
TEST 47 
hoy TSTNC 
MOV stgtea NEXT 
Rl CONTAINS BASE OMCLL ADDRESS 
MST | ;MASTER CLEAR _DMCL1 
sSITL1, (RL) :SET LINE UNIT LOOP 
LR R3 SZERO BIT COUNT 
Le RY °R4 CONTAINS CHAP TO SE LOADED IN SILO 
CLR RS RS CONTAINS, oF CHAR CURRENTLY BEING SHIFTED 
éLR 4g ’ :CLEAR SOFT 
MOV BCRCLS,XPOLY 3LORD POL YNOMINAL ae 
SR PC, SYNLOD 3080 SILO WITH 2 SYNCS, SOM SET 
MOV RS 4(R1) BORTY*CHA 
ROMCLK > NEXT KORO I§ INSTRUCTION, ROMCLK PC=530 
162110 :LOAD OUT 
NC now s INC ENENTS a NEXT CHARA CTER 
MOV RY 4(R1) :PORT4*CHAR 
ROMCLK SNEXT WORD IS INSTRUCTION, ROMCLK PC=5304 





JTC» - fore 


JIT ~ 3-3-3 
VOU £m 


i 


QUITO Un 


fulusr--+-»- 


wo scrum 


UUTUTUNUTUNUTOn 
Trae ae a 


fUTUTUTUTOFOFUTUIUTOFD  fUfurorurofUrOfUrorun forofuhanononono rors 
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ne ee 
t 
’ 


CO7 


122110 :LOAD OUT DATA 
INC RY “INCREMENT TO NEXT CHARACTER 

MOY RY. 4(R1) 3 PORTH. H 

ROMCLK =NEXT WORD IS INSTPUCTION, SOMCLK PC=S204 
122110 < “LOAD OUT DATA 

ISR ¢,OCOR WAIT. FOR OCOR 

DATACLK, 32 -CLOCK DATA 

MOV RS, 33 ;LOAD_CHAR FOR SOFT CRC 

DATACLK, ! :SHIFT BCC ONCE 

JSR RS,SIMBCC :CALCULATE SOFT BCC 

1 -SOFT SHIFT COUNT 

0 -SOFT CHARACTER 

9 :OLD SOFT BCC aor 

acs cs :BR IF SOFT BCC LSS IS SET : 

JSR PC .GETQI -GET HARDWARE RECEIVES ECC LSE 
8cC 6$ :BR IF OK (CLEARED) 

HLT 22 :ERROR, BCC LSB WAS SET 

gk &S -CONTIAUE WITH TEST 

ISR PS GETGI “GET HARDWARE RECEIVER BCC LSE 
Bcs 3 :BR IF OK (SET) 

HLT 23 :ERROR, BCC LSB WAS CLEAR 

ROR 33 sSHIFT SOFT DATA 

MOV CALECC.4$ :LOAD OLD SOFT 8cC 

INC R3 - INCREMENT SIT COUNTER 

CMP #10,R2 :DONE A FULL CHARACTER YET? 

BNE : IF NO 

CLR R2 :RESTART BIT COUNTER 

INC RY SINSREMENT DATA FOR SILO 

CMe #400,R4 “OuNE BINARY COUNT YET? 

BL oh} -BR IF YES 

MOV RY 4(R1) :PORTHeDATA 

ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLA PC=5304 
l22110 ;L009 OUT DATA 

ING RS : INCREMENT DATA 

CMP 8400, R5 -DONE BINARY PATTERN YET? 

SNE 13 BR IF NO | 

SCOPE -SCOPE THIS TEST 


FRHRARHRR AAAS RRR A RSRASEFARR TEST SD seaeeeeaeesesesseeeeseeets+e 
;#TRANSMITTER DOCMP CRC TEST 

:#THIS TEST TRANSMITS A FOUR CHARACTER MESSAGE WITH CRC 

;#BOTH DATA AND THE BCC ARE VERIFIED IN THE SIT 

:*#WINDOW. THE FOUR CHARACTERS ARE O,125,252,377 





:#THE TRANSMITTER IS CHECKED FOR GOING {0 A MORK STATE AFTER THE Bcc 


£ fs PHASRSESSSATALSAALAARAAATEARALLERESRALTSLALATA TASTE SHELAE RTARTA ALE 


; Test SO 


hoy 950. TSTNO 
MOV #7StS] NEXT 


MSTCLR 








DO? 
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3383 LOAD OUT DATA SILO 
397] 022620 018711 004000 MOV WBITL1,(R1) SET LINE UNIT LOOP 
S372 E124 012704 27874 MOV sMESOAT RY L080 POINTER TO DATA 
3373 921830 005037 21724 CLR 10$ ;CLEAR SOF 
33974 021534 12700 900004 MOV #4, RO :LOAD CHARACTER COUNT 
3375 d2ig4o C0473? O272S6 JSR PC}SYNLD LOAD 2 SYNCS IN OUT SILO 
3376 OS1844 004737 2627 r58 PC OUTRDY WAIT FOR OUTRDY 
3377 O21850 904537 O27412 J RS | MESLO LOAD SILO WITH 4 CHAR MESS 
3378 21858 92767 MESDAT ZADDRESS OF MESSAG 
3373 d21658 090004 - :NUMBER OF CHARACTERS 
3380 E1660 JOS?37 927366 JSR PC, EOM :LOAD GARSAGE CHARACTER, WITH EOM SET 
3381 O21684 O04727 026144 ISR PC, OCOR sHAIT FOR OCOR 
3382 Cig7O 05003 cLR R3 CLEAR BIT COUNTER 
3383 O21672 104415 oocdz2 DATACLK, 22 CLOCK DATA 
3954 S21E7S 112405 128: NGVB. | (R4) +, R5 :LOAD Re ITH CHAR 
sxe5 E1700 Oi OsCe MOV RS,R2° ;LOAD R2 WITH CHAR 
3387 ;CHECK FIRST FOUR CHARACTER MESSAGE 
Sees 3IN THE SIT WINDOW (0, 125,252,377) 
S33 
3999 Cel70e C.2737 120001 927110 MOV WORCLE,XPOLY —_; LOAD POLYNOMIAL 
399: 021710 OiS==> 031722 Mov RS,678' ;LOAD SOFT CHAR FOR SCC 
S332 O2i714 004537 027004 JSR RS /SIMBCC ICA CULRTE gOFT B¢C 
2333 921720 000010 10 HIFT COU 
3984 21722 009000 673 a sMARACTER 
3395 021724 000000 108 fs 70.9 BCC 
3355 021726 913737 ce7112 021724 MOV CALBCC, 108 LOAD SOFT ¢ FOR NEXT SHIFT 
2997 «(081734 104415 000001 b48 DATACLK, 1 SHIFT DATA ih To et? wInesa 
393 G21740 19002 RORS 2 :SHIFT SOFT DATA 
3995 021742 15300 BCC oss BR IF A SPA 
$500 O21744 004737 oz6112 ISR PS. GETS! :LO0K AT BIT WINDOW 
| $00: 681750 103496 gts 3 :BR IF OK (MARK) 
| $002 SE17S2 104006 HLT 5 :ERROR, BIT HINDOW WAS @ SPACE 
| $003 O81754 900404 3 b63 ; CONT IAUE 
, $004 02175 004737 o26112 o53 JSR PC GETS! 300K AT B27 INO 
4995 Oel76e 10300) BCC 2st [BR JF OK (SPAC 
4095 Qel76% LO4CDE HLT 6 sERROR, “Brt NENSOU WAS A 
4007 Gel766 66S: 
| $552 S217Ee 205202 INC g3 BUNE BIT COUNTER 
| 4008 Gel770 622703 000010 cue #19,R3 Soe ULL 2 °BITS YET 
4510 621774 901357 BNE 543 ; 
4011 21776 996903 CL R3 : Tea TT COUNTER 
“012 022005 035300 DES RO BEE CHARACTER COUNT 
3313 Seecte 001335 BNE 128 :BR IF NOT DONE YET 
4315 ;CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 
| 7.5 
| 4017 022094 013700 D27112 MOV CALBCC,RO sPUT BCC _IN RO 
| $018 22010 104415 O0000! 683:  DATACLK,] PSHIET HAROUBRE BCC 
| 4839 922014 006000 ROR RO SHIFT SOFT 
| $020 Oeed16 103005 BCC 638 :3R IF CARRY Sea 
«$021 922920 004737 026112 JSR  =—- PC, GETS :LOOK AT BIT WINDOW 
| 022 Oee0e4 103406 Bes. ié77088 :BR IF OK (MARK) 
| Ge OQOge0e& 104024 HLT 14 :ERRO SR, CRC WRONG (SPACE) 
«$024 222030 OCosd4 ER 708 ; CONT IAUE 
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Mrmr n®m £rMmvVor 
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ae ee ee ee ee 
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ISR Po GETSI :LOOK AT BIT WINDOW 
BCC 70$ “OR IF OK (SPACE) 

HLT 14 ‘FRROR, CRC WRONG (MARK) 

INC R3 :BUMP BIT COUNTER 

Eup 820,83 FINISH D BCC YET? 

BNE 685 IF NO 

CLR R3 CLEAR BIT COUNTER 

sCHECK TO SEE IF TRANSMITTER IS MARKING 

DATACLK, l s CLOCK TRANSMITTER 

JSR PC, GETSI LOOK K AT WINDOW 

ets 3$ T SHOULD BE MARKING 

HLT Dy EP ROR, SIT WAS A SPACE 

INC R3 BUMP SIT COUNTER 

CMP 87 ,R3 ‘DON TET 

SNE F NO 

DATACLK, 19 :GIVE ENOUGH TICKS TO CLEAR OUT ACTIVE 
CLR RG ;CLEAR BIT COUNTER 

BATACL SHIFT OUT NEXT SIT 

ISR PC, GETS! sLOOK AT BIT WINDOW 

BCs r R IF IT IS A MARK 

HLT 34 ERROR TRANSMITTER IS NCT MARKING 
INC R3 :INC BIT COUNT 

emp 820,83 : DONE ver 

BNE 4§ :BR IF N 

SCOPE : SCOPE THIS TEST 


pageneeeensenerensseereree TEST Sl ween eeee esses eeeeesesszccse 
: *RECEIVER DDCMP CR 

-aTHIS TEST CL DeKS 5 FSCR CHARACTER MESSAGE WITH BCC 

:#AND VERIFYS CORRECT OHTA RECEPTION AND BCC MATCH 

ple FOUR CHARACTER MESSAGE IS 0,125,252,377 
scalienbinelnunnkabadonsncsisbaadinesiianiiaameieeeminiiasaniaaal 


: TEST 51 
Mov #51, TSTNO 
MOV sTSTS2, NEXT 
RI =GONTRINS BASE DMCLI ADDRESS 


MSTCLR :MASTER CLEA 1 

MOV s8IT11 (RL) -SET LINE UNIT LOOP 

MOV aMeSOAT, R ‘LOAD POINTER TO DATA 

MOV RO ;LORD CHARACTER COUNT 

ISR BC: SYNLD LOAD 2 SYNCS IN OUT SILO 

J5R PC: OUTRDY :WAIT FOR OUTRDY 

JSR RS; MESLD :LOAD SILO WITH 4 CHAR MESS 

MESDAT ;RODRESS OF MESSAGE 

+ "NUMBER OF CHARACTERS 

ISR PC,EOM "LOAD GARBAGE CHARACTER, WITH EOM SET 
JSR PC OCOR =WAIT FOR OCOR 

DATACLK, 11 : CLOCK 

JSR PC, INROY :WAIT FOR INRDY 

ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
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CO00d4 


0e6752 


003004 
177400 
026752 


Dodoo! 


000052 
023436 


pogo 


027256 
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1§: 


ess: 


021204 :GET IN DATA 
MOV 4(RL),RY “PUT "FOUND" IN RY 

MOVE = (R2)+.85 :PUT “EXPECTED” IN RS 

CMPB sé. RY :COMPARE RECEIVED DATA 

BEQ 13 -BR I 

HLT 10 :DATA ERROR 

DEC RO :DEC CHARACTER COUNT 

BNE 33 -BR IF NOT DONE YET 

sCHECK TO SEE THAT IN BCC MATCH IS SET 

ISR PC, INRDY :WAIT FOR INRDY 

ROMCLK INEXT WORD Is INSTRUCTION, ROMCLK PC=5204 
021204 ;GET FIRST HALF OF CRC 

MOVS 4C(RL), TEMP3 :PUT IN Fempa 

BIC wi77400, TEMPS CLEAR HI BYTE 

ISR Pe INRDY WAIT FOR INRDY 

ROvCLK :NEXT WORD IS INSTRUCTION, ROMSLK PC=5304 
MOV 4(R1),R4 :PUT “FOUND” IN R 

RIC #376, R4 LEAR UNWANTED St : 

MOV #1, RS :PUT “EXPECTED” IN RS 

CMPB RS RY -1§ IN BCC MATCH SET? 

BEQ (ata 

HLT is sIN BCC MATCH ERROR 

ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
021294 :GET LAST HALF 

SCOPE :SCOPE THIS TEST 


y RRRHASALARSRERAARALAARARALE TEST SO eRe RRARHE LEAH LAA SA EARLE 
: xDDCMP EOM FUNCTION TEST 
*THIS TEST LOACS OUT SILO WITH: 2 SYNCS,4 CHAR MESSAGE EOM 
i CHARACTER MESS EON. THE DATA STREAM tS CHECKED To 5¢ 
C KS. THIS nee VERIFYS Pua? 
STE cHARC Ftns oROeD TH EOM SET A 
;*ALE DATA AN +m ace *S ARE CHECK a ” THE BT yen 


5 
i #RECEIVED gaene is CERIPTES. AN 2° tH as MATCH IS CHECKED 
+ EER SEEE REALE ERR EE ES EAEEEES ARES RESALES EAE ERE ESSE SEE SEA EEE ESS 


s TEST S2 


hov 852, TSTNO 


MOV eTSTS3, NEXT 
:R1 CONTAINS BASE DMC1! ADDRESS 
MSTCLR :MASTER CLEAR DMC1LI1 


;LOAD OUT DATR SILO 


MOV #BIT11,(R1) :SET LINE UNIT LOOP 
MOV aESDAT RA sLORD POINTER 76 DATA 


10 LEA 
MOV #4,RO ;LOAD CHARACTER COUNT 
JSR PC, SYNLO ;LOAD 2 SYNCS IN OUT SILO 
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4190 
4191 QeebO& 103001 BCC 708 :SR IF OK (SPACE) 
4192 Oee6bi0 104014 HLT 14 SERROR, cRC WRONG (MARK) 


JSR ——- PC ,OUTRDY ;WAIT FOR OUTRDY 
JSR ——s RS" MESLO SLOAD SILO METH CHAR MESS 
MESDAT. - ' ADDRESS OF MESSAGE 
;NUMBER OF CHARACTERS 
4141 923414 OO4737 027366 ISR c,E0M ;LOAD GARBAGE CHARSCTER, WITH EOM SET 
4i42 022420 094537 027412 J5R Rs" MESLD LOAD FOUR MORE CHARACTERS 
4143 025424 027674 MESDAT ;AOORESS OF MESSAGE 
4144 923436 900004 ee UMBER OF CHACTERS 
4145 022430 004737 027366 JSR PC, EOM SET EOM 
4146 522434 O04737 86144 JSR PC OCOR :WAIT FOR OCOR 
4i4? 923449 005053 es ; CLEAR BIT COUNTER 
eivg O2442 104415 000022 BATACLK, 22 CLOCK DAT 
4143 022446 112405 128: MOVE CRM) +, RS TOAD RS WITH CHER 
4:89 SeeHs0 O10s0e MOV =—s-RS Re LOAD R@ WITH CHAR 
4152 ;CHECK FIRST FOUR CHARICTER MESSAGE 
4183 ;IN THE BIT WINDOW (0, 125,252, 377) 
4155 o22452 912737 120001 Oce7110 MOV WORCLE,XPOLY —; LOAD POLYNOMIAL 
4156 O25460 019537 22472 MOV =s- RS E78 LOAD SOFT CHAR FOR BCC 
4157 d2e464 004537 927004 SR «RES STMBCC | iSALCUCATE SOFT BCC 
4158 O2247G 000010 10 ; SHIFT 
4153 Q2e472 900000 é7$: 0 iRHARACTER 
4160 932474 900900 10s: 0 OLD BCC 
4161 O23476 013737 o27112 O22474 MOV. CALBCC, 108 ;LOAD SOFT BCC FOR_NEXT SHIFT 
41g 922504 104415 O00001 64S: DATACLK, 1 |. $SHIFT DATA IN TO BIT WINDOW 
4163 022510 106002 RORB Re :SHIFT SOFT DATA 
4164 022512 103005 _ BCC a3 ;BR IF A SPACE 
4165 922514 004737 026112 JSR BEGETS LOOK AT iT WINDOW 
4166 022520 103406 acs a3 BR IF OK (MARK) 
4167 022522 104006 HiT 86g SERROR, BIT HENDON WAS A SPAC 
4168 022504 O00404 __ BR bos ONTIAU 
4169 022526 004737 o26112 ess: JSR  PC,GETSI :L00K AT BI1_WINOOM 
4170 022532 103001 BCC b6$ :5R IF OK (SPACE) 
4171 022534 104006 : HiT 86 & TERROR, BIT WINDOW WAS A MARK 
4i7e 022536 bos: 
4173 022536 05203 INC R3 BUMP BIT COUNTER 
4174 922540 22703 ooooi0 CMP #10,R3 iON E FULL 8 BITS YET 
4175 022544 691357 BNE 648 F NO 
4176 022546 905003 CLR 0 «&3 CLEAR BIT COUNTER 
4177 022559 905300 DEC RO iDEC CHARACTER COUNT 
412g Geess2 00.335 BNE 12g :8R IF NOT DONE YET 
1180 ;CHECK BCC FOR PRECEDING MESSAGE IN THE SIT WINDOW 
| 4182 922554 013700 o27112 MOV. —- CALBCC, RO PUT BCC_IN RO . 
| 4183 922560 104415 00000! 68$: DATACLK,1 :SHIFT HARDWARE BCC 
| 4184 022564 006000 ROR RO ;SHIFT SOFT BCC 
4185 02256 103005 BCC 0s FS :BR IF CARRY CLEAR 
| 4186 022570 004737 ozt112 JSR PC, GETS? ;LOOK AT BIT WINDOW 
| 4187 022574 103496 Bcs = 708 BRIE OK (MARK 
| 4188 022576 104014 HLT 14 sERROR SRE RONG (SPACE) 
4189 022600 O00404 BR 70$ : CONTIAUE 
| O2e602 004737 Oz6112 69$: JSR PC.GETSI DOK AT BIT _WINOOW 
} 
| 
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INC R3 ;BUNe BIT COUNTER 
CMe #20,R3 FINISHED BCC YET? 

BNE 68% 

CLR R3 La BIT COUNTER 

9 #4,R0 “RESET CHARACTER COUNTER 
MOV BMESDAT,RY ‘LOAD MESSAGE POINTER 
CLR 1§ :CLR SOFT BCC 

MOVE = (R4) +, RS :LOAD CHAR IN RS 
MOV RS, Re ‘LOAD CHAR IN R2 


;CHECK SECOND MESSAGE IN THE BIT WINDOW (0, 125,252,377; 
foe BEAL IE. POLY 3 LOAD SORT CLARE 


2 ‘LOAD SOFT CHAR FOR BCC 

TR RS‘ SIMBCC ear CULATE SOFT BCC 

10 :SHIFT COUNT 

5 : CHARACTER 

0 ?OLD BCC 

MOV CALBCC, 118 “LOAD SOFT BCC FOR NEXT SHIFT 
DATACLK, 1 :SHIFT DATA IN T BIT WINDOW 
RORS RE : SHIFT SOFT DAT 

BCC 743 BR IF A SP ate 

JSR PC GETSI *LOOK AT BIT WINDOW 

és 75$ ?BR IF OK (MARK) 

HiT a -ERROR, BIT WINDOW WAS A SPACE 
39 : CONTINUE 

ISR ee Scets] “LOOK AT BIT WINDOW 

cc zs -BR IF OK (SPACE) 

HLT *ERROR, BIT WINDOW WAS A MARK 
INC R3 :BUMP BIT COUNTER 

tue #10,R3 i BONE FULL § BITS YET 
BNE 73§ F NO 
CL R3 :CLEAR BIT COUNTER 
DEC RO ISEE CHARACTER COUNT 
BNE 138 !88 IF NOT DONE YET 

sCHECK SCC FOR PRECEDING MESSAGE IN THE BIT WINDON 
MOV CALBCC,.RO :PUT BCC IN RO 
DATACLK, | ;SHIFT HARDWARE SCC 
ROR RO :SHIFT SOFT gcc 
BCC 78S :BR IF CARRY CLEA 
TSR PC GETSI *LOOK AT BIT WINDOW 
acs 73¢ -5R IF OK (MARK) 
HLT 14 : ERROR CRC WRONG (SPACE) 
ae 738 : CONTINUE 
TSR PC GETSI LOOK oe aoe: WINDOW 
Bcc 79¢ :BR IF OK (SPACE) 
HLT 14 ERROR, eRe WRONG (MARK) 

Inc R3 ;BUMP_BIT COUNTER 
CMP 820,R3 ‘FINISHED BCC YET? 
BNE 77§ 


Ti ; F NO 
CLR R3 ;CLEAR SIT COUNTER 








us 
4 
4 
ib 
4 
a 


Oor-Orr- OC Rol 


OVOoONve-+-MVMIOr-O 


= 
w& 


004737 
1O4414 


;CHECK TO SEE IF TRANSMITTER IS MARKING 
;CLOCK TRANSMITTER 
7 K AT WINDOW 


bate ky BE MARKING 
an He ° SPACE 


DATACLK, 


JSR 


:CHECK TO SEE THAT FIRST FOUR CHARACTER MESSAGE 
;WAS RECEIVED CORRECTLY (0,125,252, 377) 


iGET Rn te RECEIVER 

iba tee Me SINTER IN Re 

NEXT WORD IS INSTRUCTION, ROMCLK P 
} apes reso iN 
iTS 5 REDE VED DATA C 

RECEIVE DATA ERROR 
DEC CHARACTER COUNT 
;BR IF NOT DONE YET 


;CHECK TO SEE THAT IN BCC MATCH IS SET 
SAND THAT THE SCC WAS RECEIVED CORRECTLY 


DATACLK, 
M 


JSR 
ROMCLK 
‘tian 


ROMCLK 





PBR Fr Rid 
GIVE iva inte TO CLEAR OUT ACTIVE 


DY 
:NEXT WORD a PASTAS TION, ROMCLK PC=S304 
aET FIRST F OF CRC 


R_INRDY 
{NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 


;PUT “FOUND” _IN RY 
; CLEAR ete lt 2 ae 


1S IN ace MATCH oF 
;IN BCC MATCH ERROR 
sNEXT WORD IS INSTRUCTION, ROMCLK PC=53C4 


2 / ‘ ¥ 
' nen 
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DZDMEA.P1} BASIC RECEIVER TESTS 
4305 023220 921204 021204 :GET LAST HALF 
4306 Oe2222 116137 000904 901251 MOVE 4(RL),TEMP2+1  ;PUT IN TEMPS 
4307 23230 042737 000377 001250 BIc #377, TEMP2 ‘CLEAR LO BYTE 
4398 23236 OS3737 901250 O01252 BIS tEnps TEMP +16 BIT BCC NOW IN TEMPS 
4309 923244 623737 O2Tll2 OO0l252 CMP caLBCe, TEMP3 :IS IT CORRECT? 
4310 5332s2 001401 BEO 425 :BR IF OK 
431i §23254 104027 HLT 27 : 
4323 :CHECK TO SEE THAT SECOND FOUR CHARACTER MESSAGE 
4333 -WAS RECEIVED CORRECTLY (0,125,252, 377) 
| 
S318 023256 212703 000004 423: MOV #4,R3 :R3=CHARACTER COUNT 
4317 O23262 O12702 Oe7674 MOV #MESDAT, R2 10RD MESSAGE POINTER IN Re 
4318 023266 O04737 O26752 433: JSR PC, INRDY WAIT 
431§ 023272 104414 ROMCLK : NEXT FSR IS INSTRUCTION, ROMCLK PC=5304 
4320 023274 021204 ___ 021254 
4321 023276 O16104 000004 MOV 4(R1),R4 :PUT “FOUND” IN R4 
4322 923302 112205 MOVB  (R2)+.85 sPUT "EXPECTED" IN RS 
4323 023304 120504 CMPB RS. RY 28 RECEIVED DATA CORRECT? 
4324 923306 991401 BEQ <2 F YES 
“325 022310 104010 HLT 10 ECE TVE DATA ERROR 
“326 O23312 005303 S4$: DEC RB :DEC CHARACTE” COUNT 
i3e2 022314 001364 BNE 433 :BR IF NOT DONE YET 
4329 :CHECK TO SEE THAT IN BCC MATCH IS SET 
#359 “AND THAT THE BCC WAS RECEIVED CORRECTLY 
4332 023316 004737 O26752 JSR PC, INRDY :WAIT FOR INRDY 
4233 922322 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=53204 
4334 923354 921204 C21204 GET FIRST HALF OF CRC 
4325 023326 116137 ocOCcoo4Y of1e52 MOVS 4(R1), TEMP3 :PUT IN TEMP3 
4336 023334 042737 177490 O0i25e2 Bic #177400. TENS :CLEAR HI BYTE 
4337 Qe234%2 904737 Oe675e JSR PC, INRDY :WAIT FOR INRDY 
| 4338 023346 104414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
| 43339 023350 O@1c44 021244 
43490 023252 O1S1c4 909904 MOV 4(R1), RY ;PUT “FOUND” IN R 
| 4341 023356 042704 000376 BIC #376 RY :CLEAR UNWANTED SITs 
4345 922262 912705 000001 MOV #1,R5 -PUT “EXPECTED” IN RS 
4343 322266 120504 CMPBRS'RY ?IS IN BCC MATCH SET? 
4344 923370 001401 BEQ 51g 
4345 623372 104015 HLT 15 :IN BCC MATCH ERROR 
| W346 052374 518: 
4347 023374 104414 ROMCLK NEXT WORD | Is_ INSWAUCTION, ROMCLK PC=S304 
| 4348 023376 021204 021204 :GET LAST 
4349 923400 116137 O000D4 oo1es1 MOVs 4cRL) TEMP2+1 PUT IN TENE 
| 4250 922406 642737. 000277 901250 BIC 77, TEM :CLEAR LO re 
435] 923414 053737 001250 o01252 BIS TEMPS, TEMP3 :16 BIT BCC NOW IN TEMPS 
| 4352 023422 023737 O271l2 O01252 CMP CALBCE,TEMP3 =: IS ‘IT CORRECT 
| 433 «923430 001401 BEG S$ : 
+ 4354 023422 104027 HLT 27 
| 135 622434 104489 S$: SCOPE :SCOPE THIS TEST 
435 
4358 5 RRHKEREAE ARKAREREARRERRERE TEST SO See eee eke keen tere a eareaaaer 
4359 :¥DDCMP EO FUNCTION 


TEST 
r*THIS TEST LOADS OUT SILO WITH: 2 SYNCS,4 CHAR MESSAGE, EON 








KO7 : 
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DZDMEA.P11 “BASIC RECEIVER TESTS 
4361 ;*50,4 CHAR MESS.EOM. THE DATA STREAM IS CHECKED TO BE 
4362 :*4 CHAR,BCC,4 CHAR, BCC,MARKS. THIS TEST VERIFYS THAT 
4363 T*THE CHARCTERS LOADED WITH EOM SET ARE LOST , 
4384 ALSO THAT THE CHAR LOADED WITH SOM_IS NOT IN THE SCC al 
4365 ALL VATA AND BCC’S ARE CHECKED | IN THE BIT WINDOW 
4365 ;*THE FOUR CHARACTER MESSAGE IS 0 
4367 ; *RECEIVED DATA IS VERIFIED, AND tn” Bee MATCH IS CHECKED 
ize erererrrertiiirititirertririiieti tite titestitiiierttttetritire! 
436 
4370 ; TEST S53 
_. eee eens eens. tet RRL asa ye 
4373 023436 912737 000053 901226 TSTS3: ov #53, TSTNO 
4373 23444 012737 024636 O01216 MOV eTSts4 NEXT 
«Snes am sR1 CONTAINS BASE DMC11 ADDRESS 
HecS O234S2 104412 MSTCLR :MASTER CLEAR DMC11 
4377 LORD OUT DATA SILO 
¢ 
4373 023454 012711 904000 MOV #31711, (RL) ;SET LINE UNIT LOOF 
4380 923460 012704 027674 MOV #MESOAT,R4 :LOAD POINTER TO DATA 
4381 023464 005037 923600 CLR 10§ CLEAR SO 
4382 O23476 012700 090004 MOV #4, RO LOAD CHQRACTER COUN 
4383 023474 004737 027256 JSR PC: SYNLD LOAD 2 SYNCS IN OUT "stro 
4384 023500 004727 026276 JSR PC; OUTRDY {WAIT FOR OUT 
4385 923504 004537 Oe7412 JSR RS MESLO LOAD SILO WITH 4 CHAR NESS 
4386 922510 027674 MESDAT ADDRESS OF MESSAGE 
4387 023512 O00004 4 :NUMBER OF CHARACTERS 
4388 023514 004737 027366 JSR «PC, EOM :LOAD GARBAGE CHARACTER, MITH EOM SET 
4389 023520 904737 027336 J5R PC’ SOM LOAD GARBAGE CHAR WITH’SOM SET 
4380 923524 004537 027412 JSR RS. MESLD ;LOAD FOUR MORE CHARACTERS 
4391 023530 027674 MESDAT ADDRESS OF MESSAGE 
4392 023532 000004 : ;NUNBER OF CHACTERS 
4393 023534 004737 927366 JSR PC, EOM T 
4394 e3540 004737 Oe6144 JSR —s- PC, OCOR {WAIT FOR OCGn 
4395 023544 095003 CLR R3 ; CLEAR BIT COUNTER 
4396 De3546 104415 000022 _ BATACLK, 22 CLOCK DAT 
4397 923552 112405 123: MOVE ‘(RY)+,R5 COAG RS WITH CHAR 
4398 Des5s4 C1002 MOV —s-RS, RE :LURO R@ WITH CHAR 
4400 m ;CHECK FIRST FOUR CHARACTER MESSAGE 
#401 5 SIN THE BIT WINDOW (0,125,252, 377) 
c 
4403 02355 012737 120001 027110 MOV #CRC15,XPOLY  ;LOAD POLYNOMIAL 
4404 023564 010537 923576 MOV RS,67$ LORD SOFT CHAR FOR SCC 
4405 922570 004537 927004 JR  —- RESSIMBCC :CALCULATE SOFT BCC 
4406 023574 000010 10 SHIFT COUNT 
4407 923576 000000 67: 0 ; CHARACTER 
4408 923600 000000 108: OLD BCC 
4409 023602 013737 oe7112 023600 MOV CALBCC, 108 LOAD SOFT gle FOR NEXT SHIFT 
44i0 023610 104415 Oco00! 64S: DATACLK, 1 SSHtFT DATA IN TO BIT NINOOH 
4411 O23614 106002 : RORB Re : SHIFT SOE T ORT 
4412 023616 103005 : BCC 65$ :BR IF A SPA ce 
4413 023620 004737 026112 JSR ——- PC, GETS! LOOK AT BIT WINDOW 
4414 023624 102406 Bes StséES :BR IF OK (MARK) 
4H4i5 OZ3656 104006 HLT ~ :ERROR BIT WINDOW WAS A SPACE 
4416 023630 OCOO404 CF b6$ CONT TINUE 









LO? 
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4417 023632 OO4737 026112 65$: JSR PC, GETSI sLO0K AT BIT WINDOW 
4418 622636 iUsU01 Bc¢C b6$ -BR IF OK (SPACE) 
4419 023645 104006 HLT 6 ‘FRROR, BIT WINDOW WAS A MARK 
4439 Dest ig 66S: 

4y451 Oese4e 005203 INC R3 :BUMP BIT COUNTER 
4422 023644 622703 o00010 CMP #10,R3 ; DONE FULL 8 SITS \ 
4423 923650 901357 BNE 64S “BR IF NO 

4424 923652 005003 CLR R3 ‘CLEAR BIT COUNTER 
w425 033654 005300 DEC RO ‘DEC CHARACTER COUNT 
142 d2365& 901335 BNE 12 *BR IF NOT DONE YET 
a é 


S428 ;CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 


4430 023660 013700 Oe7lle MOV CALBCC,RO ;PUT BCC IN RO 

4431 Oe3664 104415 O00001 68$: DATACLK, 1 SHIFT HARDWARE BCC 
4432 023670 996000 ROR RO :SHIFT SOFT BCC 

4433 023672 103005 BCC 698 ;BR IF CARRY CLEAR 

4434 023674 004737 Oebile JSR PC, GETSI ;LOOK_AT BIT WINDOW 
S435 023700 103406 BCS 708 ;BR_ IF OK (MARK) 

4436 O23702 104014 HLT 14 ; ERROR CRC WRONG (SPACE) 
4437 923704 O00404 BR 70$ 

4438 023706 O04737 Oebile 69S: JSF PC, GETSI LOOK AT BIT WINDOW 
4439 02371e 103001 BCC 70$ :BR IF OK (SPACE) 

4440 923714 104014 HLT 14 : ERROR, Re WRONG (MARK) 


4441 92371 708: 

wu42 923716 005203 INC = -RB ;BUMP BIT COUNTER 
4443 023720 022703 000020 : CMP #20, R3 iF INISHED BCC YET? 
4444 023724 001357 BNE BS :BR_IF NO 

Wiis 023786 008003 CLR RQ CLEAR BIT COUNTER 


S447 ;CHECK CHARACTER LOADED WITH SOM (000), IN THE SIT WINDOW 


4449 023730 905905 CLR RS ; CHARACTER LOADED WITH SOM 
4450 023732 010502 r MOV R5,R2 “LOAD R2 WITH CHAR 
4451 023734 104415 oooco: » 32$:  DATACLK, l :CLOCK TRANSMITTER 
3740 -SHIFT SOFT DA 
3 C 30$ :BR IF SPACE 
454 022744 004737 026112 JSR PC, GETSI :LOOK AT BIT WINDOW 
S455 023750 i03406 BCS 31$ :BR IF OK (MARK) 


4456 Q2e3752 104006 HLT -) ; ERROR BIT WINDOW WAS A SPACE 
4457 023754 O00404 BR 31$ NTINUE 

4458 023756 004737 O2bile 308: JSR PC, GETSI 100K AT a) WINDOW 

4459 Q0e376e 103001 BCC 31$ :BR IF OK (SPACE) 

4460 023764 104006 HLT 6 ;ERROR, BIT HTNOOe WAS A MARK 
4461 Oe3766 005203 31S: INC R3 :BUMP BIT COUNTER 

4462 023770 Qee703 000010 CMP #10,R3 DONE CHARACTER YET? 

4463 023774 001357 BNE 325 :BR Na No 

4464 023776 005003 L R3 :RESET BIT COUNTER 

S465 024000 QO1e700 O00004 MOV #4, RO sRESET CHARACTER COUNTER 
4466 QO24004 012704 027674 MOV #MESDAT, RY ;LOAD NE SSOR POINTER 

4467 Oe4010 005037 O2404e CLR 11$ :CLR SOFT BCC 

S468 Oe4014 112405 13$: MOVB (R4)+,RS LOAD CHAR IN R5 

4469 024016 010502 MOV RS,Re LOAD CHAR IN Re 


;CHECK SECOND MESSAGE IN THE BIT WINDOW (0, 125,252,377 
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ZOMER.P11 
4473 024020 
4474 OD240e6 
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BASIC RECEIVER TESTS 


012737 


104006 
pOSsne 


905003 


104415 


ToWuié 


120001 927110 
024040 


027004 
Oe71le 
00000: 
026112 


Oe61le 


000010 
G27112 
000001 
Oz611e 


025112 


Jvooce0 


000001 
Ceblile 


000007 
000010 
000001 


024042 






























MO? 





MOV #CRC16, XPOLY ;L0AD POLYNOMIAL 


MOV RS, 76$ ‘LOAD SOFT CHAR FOR BCC 
JSR RS‘ SIMBCC ‘CALCU CATE SOFT BCC 
10 :SHIFT COU 
76S: : SiaracrER 
MOV CALBCC, 118 :LOAD SOFT BCC FOR NEXT SHIFT 
73%:  DATACLK, 1 ; SHIFT DATA IN TO SIT WINDOW 
RORB ‘Re : SHIFT SOFT DATA 
BCC 74s BR IF A SPACE 
ISR PC GETSI “LOOK AT BIT WINDOU 
Bcs 75$ :BR IF OK (MAR 
HLT & ERROR BIT WINDOW WAS A SPACE 
v BR 755 :CO 
743: JSR PC, GETSI LOOK AT BIT WINDOW 
BCC 75$ -BR IF OK (SPACE) 
= HLT & ERROR, BIT WINDOW WAS A MARK 
INC R3 ;BUMP BIT COUNTER 
CMP #10,R3 :DONE FULL 8 BITS YET ’ 
BNE 733 :BR IF NO i 
CLR R3 :CLEAR BIT COUNTER 
DEC RO :DEC CHARACTER COUNT 
BNE 13$ *BR IF NOT DONE YET 
:CHECK BCC FOR PRECEDING MESSAGE IN THE BIT WINDOW 
MOV CALBCC,RO :PUT BCC IN RO 
77$:  DATACLK,1 : SHIFT AROWORE BCC 
ROR RO -SHIFT SOFT BCC 
BCC 785 :BR IF CARRY CLEAR 
ISR PC, GE~3I :LOOK AT BIT WINDOW 
Bcs 79 -BR IF OK (MARK) 
HLT 1; :ERROR, CRC WRONG (SPACE) 
BR 79g : CONTINUE 
783: JSR PC GETSI :LOOK AT BIT WINDOW 
BCC 795. BR IF OK (SPACE) 
ie HLT 14 :ERROR, CRC WRONG (MARK) 
INC R3 ;BUMP BIT COUNTER 
CMP #20,R3 sEINISHED BCC YET? 
BNE 775 
CLR R3 CLEAR BIT COUNTER 
:CHECK TO SEE IF TRANSMITTER IS MARKING 
23: DATACLK, 1 :CLOCK TRANSMITTER 
JSR PC ,GETSI sLOOK AT WINDOW 
BCs 3$ T SHOULD BE MARKING 
HLT 24 “ERROR, BIT WAS A SPACE 
3$: INC R3 :BUMP BIT COUNTER 
CMP #7 ,R3 ; DONE YET 
BNE es N 
DATACLK, 10 :GIVE ENOUGH TICKS TO CLEAR OUT ACTIVE 
CLR sR :CLEGR BIT COUNTER 
4g; DATACLK, l :SHIFT OUT NEXT SIT 





an 
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4529 024230 


ves D886 


wy SUSU 


4533 924250 


316 
455i Oe43le 


4556 024314 


4578 024430 


4582 024432 
4583 024436 
4584 co444o 
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004737 


001366 


LO4415 


001364 


004737 


104015 
104414 


104027 


004737 
104414 
021204 
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026112 
ocod20 


000990 
oooc® 


o0°- 
027674 
026752 


000004 . 


026752 


oocco4 
177400 
026752 


009904 
000376 
000001 


009004 
000377 
001250 
027112 


026752 


001252 
0012Se 


001251 


001250 


001252 
001252 
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40$: 


41S: 


50$: 


4S$: 





PC, GETS! 
+4 

24 

R3 
#20,R3 
4g 


ri 00K, AT SIT WIN UINDOH 
: ERROR TRA TER IS NOT MARKING 
; INC BIT COUNT 

ion Ever YET? 


;CHECK TO SEE THAT FIRST FOUR wg MESSAGE 
;WAS RECEIVED CORRECTLY (0, 125,252,377 


DATACLK, 
M 


1 


8 
#MESDAT, Re 
PC, INRDY 


;GET LAST BIT IN RECEIVER 
;RS=CHARACTER COUNT 
$1000 MESSAGE on IN Re 


AIT FOR IN 
:NEXT WORD IS INSTRUCTION, ROMCLK FC=S304 


;PUT “FOUND” IN R4 
PUT "EXPECTED" IN RS 
iis RECEIVED DATA CORRECT? 


RECEIVE DATA ERROR 
DEC CHARACTER COUNT 
:BR IF NOT DONE YET 


;CHECK TO SEE THAT IN BCC MATCH IS SET 
AND THAT THE BCC WAS RECEIVED CORRECTLY 


021204 
B 


PC, INRDY 


4(R1), TEMPS 
#177400, TEMP3 
PC, INRDY 


4RL) RY 
437 6 RY 
a1, Re 
0s 


4(RL), TEMP2+1 
#377, TEMP2 
TEMP2, TEMP3 
CALBCC, TEMP3 


27 


;WAIT FOR INRDY 
; NEX T WORD IS INSTRUCTION, ROMCLK PC= 5304 
ST HALF OF CRC 


; INRDY 
:NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 


;PUT “FOUND” _IN RY 

:CLEAR UNWANTED BITS 

;PUT "EXPECTED" IN RS 

:1S IN BCC MATCH SET? \ 


:IN BCC MATCH ERROR ; 
NEXT, WORD Is. INSTRUCTION, RCMCLK PC=5304 
PUT IN TEMP 


;CLEAR LO BYTE 
;16 BIT BCC NOU IN TEMP3 
315 i ECT? 


;CHECK THAT CHARACTER LOADED WITH SOM WAS RECEIVED (900) 


JSR 
ROMCLK 
021204 


PC, INRDY 





ey FOR INRDY 
T WORD IS PETRI, ROMCLK PC=5304 
RET RECEIVE DATA 








BOS 





at 1 
ll 3 IVE! : 
W595 OB4442 «(018104 000004 MOV 4¥(RL) RY BUT “Zou” IN oe 
WESE Oduye 505505 CLR 5 iPUT “EXPECTED” IN RS 
wos° Se44s0 180504 eyePg RELAY 15 RECEVIEC bata ‘Fees t? 
wdsg Qew4S2 00140) Begs Ye 
#38: Bs4ed$  1O4e18 HLT 16 RECEIVE DATA ERROR 
4531 :CHECK TO SEE THAT SECOND FOUR CHARACTER MESSAG 
733s RAs RECEIVES CORRECTLY 10, 138,88, 2975 
Ts 35 
3535 D2445E 012703 900004 423: MOV :R3z CHARACTER COUNT 
e595 da44h2 O1e7o2 OSTér4 | MOV sreSber SE a0 ME SSRGE POINTER IN R2 
sds Dd445o 304737 026752 433: JSR PC INRDY nat T FOR INRD 
45S? CS4472 154414 ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
sése CS4475 021204 021204 
4538S 534475 1104 000004 MOV 4(RL) RY :PUT “EQN” IN 
3630 S24502 112205 - MOVE = (RE) 4/85 PUT “EXPECT a N RS 
4601 OB4E0S 120554 CMP RSL RS 18 FECEIVED DATA ¢ ORRECT? 
“652 O24506 C1401 859 ast R IF YES 
4603 924519 394010 HLT 19 iRECELVE DATA. ERROE 
4659 de4512 58303 448: DEC RS :DEC CTER COUNT 
+E BEuEis SoaaE4 SNE 438 SBR IF NOT DONE SET 
4607 ORC 39 SEE THAT IN BCC MATCH IS SET 
4e28 T THE acc was RECEIVED CORRECTL 
4512 224516 004737 O26752 ISR PC, INRDY WAIT FOR INRDY 
“6il 024522 154414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5305 
4512 CE4524 21204 921204 :GET FIRST HALF OF CRC 
4513 934506 116137 090004 901252 OV 4(RL) TEMPS :PUT_IN TEMP3 
4614 524534 042737 177950 O01252 = g17TSCO TEMPS CLERR HI BYTE 
4615 D24542 04737 O2e7S2 ISR PE INRDY WAIT FOR INRDY 
4516 SB4d45 104414 ROMCLK NENT WORD IS INSTRUCTION, ROMCLA PC=S304 
“517 524550 021244 021244 
4618 E4552 OIEI04 ocooc4 MOV 4(RL) RY PUT "FOUND" IN RS 
45:3 S2455— 042704 00037 BIC 8375, 84 :CLEAR UNWANTED SITS 
4620 SS4562 012705 000501 MOV #186 ;PUT "EXPECTED" IN RS 
Stzi Ce4see 120505 CMPB ORS | RS 't§ IN BCC MATCH SET? 
| 4825 Se4879 651501 Beg Ss«S18 
| SSE Oe4S7e 104015 HLT iS :IN BCC MATCH ERROR 
| 624 024574 518: 
wees C4574 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
| ese Seué75 O21204 021304 ;GET LAST HALF 
#552 24600 16127 990004 00125: Sy8 5} 42 Temper: = 3PUT IN TEMPS 
| 4628 Oeede 042737 000377 001250 BIC 337 :CLEAR LO BYTE 
| $839 534614 555737 901260 001282 be thoes aes 218 BIT BCC NOW IN TEMPS 
| 4830 24622 023737 O27112 O01zs2 oMP CALBCC TEMPQ «=: 15 IT CORRECT? 
| 463] 524635 09141 BE9 os BR IF Ok 
| 4632 524632 104027 HLT 2? 
| 4623 C2464 [O4500 oF} SCOPE ;SCOPE THIS TEST 
ae 
j se5E waite. TEST SH Seeeeeeee eee eee esa zeasreere 
| 463? , #EMPTY hy Tes 
4E28 $LoRD SILO WITH 2 SYNCS, 4 CHAR MESSAGE, SINGLE CLOCK 
4639 ;#UNTIL Hey SILO TS EMPTY, LOK 4 MORE CHARACTERS hae its 


4640 ;#SILO. GIVE MORE TIC ‘Ss, WAND VERIFY THAT ONLY THE F 








ruc 


1 
2 
€ 
A 





C08 


:#4 CHARACTER MESSAGE WAS RECEIVED AND THAT RIS IS CLEAF 


$s RRERERRAESRA RASA SEL ARE SEAS FE FSESE LEASE SSES SLA SSA FAFSA SASS FSSSSE 


; TEST S4¥ 


TSTS4: MOV 


MSTCLR 
MOV e8ITli 


MOV sMESOAt. Re 


ul 

esatoe 

=40T 
PD 
—4 
YD 
© 


3$: JSR 


! 10 
48: JSR PC, INRDY 


204 
Hoy aC) 
MOV a1: 7S. 


~ es ee + ee - ee 


#54, TSTNO 
MOV eTStss NEXT 


02 
BIT e8ITS,4(R1) 
BE 5 


TAINS et _— ADDRESS 
CLEAR DMC! 


ae pore et 


ROGK ett RTS 15 CLEARED 


sNEXT WORD IS INSTRUCTION, “ROME LK PC=§304 
:GET RT 
*IS IT CLEAR? 
;O8 IF YES 
;ERROR, RTS NOT CLEARS 
Dare hate SOME MORE 
LETS CHECK WHAT WAS RECEIVED 
NEXT WORD eo PS TLR TOR, ROMCLK FC 
{BUT 
RS = “EXP PECT 
71S OaTA ASeRE ST? 
SR I OK 
BATA ERR OR 


TERROR TRANSNITTER DID NOT ABORT 
*WAIT FOR I 


NEXT WO SRO iS INSTRUCTION, ROMCLK PC=§30 


:GET RECEIVE DATA 
sPUT IT IN "FOUND" 
;RS = "EXPECTED" 
SHOULD SEE 17% 


:BR | 
;ERROR, TRANSMITTER DIO NOT ABORT 





i 


NO ON OT Rute 0-2 0-0 2 0-< b> 


O16 Gate +O. 000 NOP ULE Goll C).000 OU 6 


See Dee Bee Dee Dee Gee Dee Bee Delt Beet Be | 


2 4495455 ee ee ee ee oe oe ee ee ee oe 


2k 
a a | 
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fulufturofororofurafororonite 
UT UTUNUT UU UT UU TU nt 


-—=-=- = 


OeS206 
OeS214 


vesece 


Asasoy 





Jr OOO 
(Jr - 
future £ 
£~3~3> 


rae 
mo 
Soe 
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st 13:18 PAGE 95 
STs 
lus: 
SCOPE ;SCOPE THIS TEST 
matin ae TEST SS #424 sects tse sess se setts sss 
ALF DUPLEX TEST 
SET LINE UNIT LOOP AND HALF DUPLEX, SEND SYNCS AND & 
: #MESSAGE. VERIFY THAT IN-ACTIVE AND IN-READY GRE CLEAR 
Ss REREEEEFHREESRESEEEEREESEAEEEEEA LEAS EESEA SESSA SS ESEFESSASESS SS 
; TEST SS 
01226 TSTSS: Mov 8S, TSTNO 
O21216 MOV eTStS& NEXT 
;R1 CONTAINS SASE DMC11 ROORESS 
MSTCLR :MASTER CLEAR DMC11 
gie,R2 :SAVE Re FOR TYPEQUT 
MOV #SIT11, (RL) :SET LINE UNIT LOOP 
o0oCo04 MOV . .#BIT4,S(R1) ;LORD PORTY 
ROMCLK NEXT WORD - INSTRUCTION, ROMCLK FC=2S304 
le2113 ;SET H/D BIT 
ISR PC, SYNLD LOAD "3 SYNCS 
JSR PC OUTROY WAIT FOR OUTROY 
ISR RS ,MESLO sLOAD 4 CHAR MESSAGE 
MESOAT Ponies OF MESSAGE 
4 sCHARACTER COUN 
JSR PC, OCOR ;WAIT FOR OCOR 
DATACLK, 73 3;SEND MESSAGE 
ROMCLK : NEXT WORD IS INSTRUCT! ON, ROMCLK PC=5304 
021244 - RE AD LU-le 
MOV 4( RL) RY sPUT “FOUND” IN 
BIC B57, RY ;CLEAR UNWANTED Sirs 
CLR RS *RS = “EXPEC 
CMPS RS 84 i IN-ACTI VE ANE IN-RDY SHOULD SE CLEAR 
BEQ 1$ 88 IF OK 
HLT 3 TERRAR BOTH ARE NOT CLESR 
1$ SCOPE 
tren coe ante gee TEST S& seweeeeaeceaessseaasseerisce 
:*DDCMP CASLE DATA TES 
-#THIS TEST LOADS Pout SILO WITH THE FOLLOWING: 
: #4 SYNCS, 16 CHAR, EOM,15 CHAR,EOM,1& CHAR ae 
THE 16 CHARACT ER INCLUDE A'FLOATING ONE AND ZERO __ 
THE DATA IS T BNSMITSED OVER THE CABLE USiNS THE INTERNAL CLOC 
i SRECETVED fear IS VERIFIED AS IS IN Bcc M 
ee BACK CONNECTOR MUST BE ON TO RUN THis 4 7257 
, ShNGNEEGEOLENEELONSDSETEEEEEEELELEEEEDESNESEEDEEDEDEOONESONNE 
; TEST S6 
001226 TSTSé: Mov 856, TSTNO 
O01z16 MOV eTStS? NEXT 


My CONTAINS GASE OMCL: ADORESS 
MSTCLR aN. MASTER CLERR OMCLL 
001366 BIT eBIT14, STAT! : SKIP TEST IF NO 


ee re eee aw ee 








ODOME _MACYLIL 
DZOMEA.PLI 
4753 925232 
u7oH  Oete : 
47S 4 
yrSe 3 544 
4752 925250 
a75s 525556 
u758 925262 
u7EO 25266 
4761 025272 
4762 03537 
4763 025302 
S764 025304 
4765 025355 
4766 025310 
4757 92531 
s7és 925320 
4763 025322 
rro 025326 
771 025330 
73 Q25232 
u774 Decade 
4775 O55344 
u77& OS34E 
4777 025352 
477g 935356 


-~ 
a 
-! 


C- SSeSeesescs 


eteterete 
GIT 

G)~3 

OWwOo 
NOOO 


364 


1 


t © 
RB8 


=] 

i] 
~ 
“jul 
© 
Lo] 


Tos4i4 


de 


02 


be 


Ge 


7lle 


74le 


ay 
74le 


7366 


026144 


< 
oC 


00 


CCO3 


O0C4 


027119 


out 


18: 


E08 


REQ 33 

ey oe OIE el 
TSR Bx: 2yN +B 
MOV ache le, XPOLY 
CLR st 

MOV #16. R32 
MOV #FLTDAT, Re 
MOVB =: (Ra) +, 5 
JSR RS, SIMBCC 
10 

0 

0 

MOV CALBCC,&$ 
DEC R3 

SNE . 
SR RS, MESLOD 
Eb TDAT 

ISR Pc ,£0M 

5R RS: MESLD 
FLTDAT 

16. 
JSR PC,E 
JSR RS: SESLD 
FLTDAT 

16. 
ISR PC .EOM 
SR PC*OCOR 
CLR RY) 
MOV #3, R0 
MOV #16. .R3 
MOV BFL THAT, Re 
JSR C,INRDY 
ROMCLK 
021204 
MOV 4(RL) RY 
MOVE = (RBI +. RS 
CMPB RS RY 
BEQ 2 
HLT 25 
DEC R3 
BNE 1g 
MOV #15.,R3 


sere CONNECTOR ON 


oo FS, mY LOOP 


Cie § ae 


YNCS 
$4080 FOL YNoHEaL FOR SOFT 


: CHARACTER COUNT 
iRe= INTER 


Pp 
sLOAD CHAR FOR SOFT & 
CALC SOFT BCC 


SSaTET COUNT 
; CHARACTER 


cc 
+L OAD ae 


ec ¢ 
:BR ob etre DONE YET 


LOAD SILO 
i RESSACE ADDRESS 
; CHARACTER COUNT 

LOAD “AN 0H 
CORD SILO ie 
:MESSAGE ADDRESS 
:CHARACTER COUNT 
;L ORD AN EON 


;LOAD SILO 
;MESSAGE ADDRESS 
pee ee COUNT 


3R MES 
:R3= “CHARACTER COUN 


: WAIT IN 

NEXT WORD IS INSTRUCTION, ROMCLK P 
RET DATA FROM IN SILO 
ip Te CT R IN “FOUND” 


PY IN_BS 
15 RECEIVED DATA CORR 
‘BR IFO 

{DATA ERROR 


spat ee ie COUN 


T 


ore 
ww 


CRC C 


CALC. 


:LO8D PERSO PSTNTER IN R2 
FOR INRDY 


T DONE THIS PESEAG ' 


R IF 
sRESET CHARACTER COUN 


;CHECK TO SEE THAT IN BCC MATCH IS SET 
AND THAT THE BCC WAS RECEIVED CORRECTLY 


PC, INRDY 


4(RL), TEMPS 
HHO. TEMES 


O_o 


;WAIT FOR INROY 


LEAR HI BYTE 
:MaIT FOR INRDY 
;NEXT WORD IS IP 





UN 
~ 


CRC 





:NEXT WORD IS INSTRUCT TON, ROMCLK PC=sS3C4 
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00009 . 


Ba8G% 


90904 


027004 


Ce7 lle 


027412 
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mM 


FO8 


021244 
ay weh ICLEAGUMURKTED 1 tT5, 
é #37% 
may i Re Ee UBeet ER FAT2 
CMPB Bc’ RY iS IN BCC MATCH Sz “7 
BEQ 25$ 
HLT 15 -IN BCC MATCH EXROR 
ROMCLK faa: WORD Is. INSTRUCTION, ROMCLI PC=S204 
021204 
MOVE  4(RL), TEMP2+! ton Tepes 
BIC #377, TEMP2 eri LO BYTE 
BIS TEMPS, TEMP3 318 BIT BCC NOW IN TEMPS 
CMP CALBCC, TEMP2 31S IT CORRECT? 
Peg 43 :BR IF OK 
MOV #FLTDAT, Re sRESET MESSAGE POINTER 
DEC RO sDECREMENT COUNTER 
BNE 13 R IF NOT BON 
SCOPE SCOPE THIS TEST 


inepeesenestsepereeteereaee TEST S7 See RKHRSR ESA SL SRE EELS ESSE 
: #DDCMP CABLE DATA TEST 

s*THIS TEST LOADS Mout SILO WITH THE FOLLOWING: 

2 ¥4 SYNCS,S9 DATA CHARACTERS, EOM WITH GARBAGE CHARACTER 

:¥THE DATA IS TRANSMITTED OVER THE CABLE USING THE INTERNAL CLOCK 
: #RECEIVED DATA IS VERIFIED AS IS IN SCC MAT 
:#LOOP-BACK CONNECTOR MUST SE ON TO RUN THIS TEST 


: f SERRA RSAAA FLAT ELE RE RAL LARS LALA LLAA LEAL LEASE TESLA ASLASS FA FALLS 


TEST S?7 


Mov #57, TSTNO 
MOV 8. EOP, NEXT 


3R1 CONTAINS arena DMC11 ADDRESS 


MSTCLR sMASTER CLEAR 
BIT #BITL4,STATL | :SKIP TEST IF NO 
BEQ 3$ “LOOPBACK CONNECTOR ON 

OV SBITL1, (RL) :SET LINE UNIT LOOP 
ISR PC, SYNLD :LOAD 2 SYNCS 

JER PC’ SyNLD :LOAD 2 MORE SYNCS 
MOV BCRCIE,XPOLY  :LOAD POLYNOMIAL FOR SOFT CRC CALC 
CLR 6g :CLEAR OLD BCC 
MOV 859. ,R3 ; CHARACTER COUNT 
MOV MESOATR2 :R2= 
MOVB = (Re) +, S$ :LOAD SAAR FOR SOFT BCC CALC. 
JSR RS SIMSCC :CALC SOFT BCC 

10 SHIFT COUNT 

: CHARACTER 

0 OLD BCC 
MOV CALPCC.6$ :LORD OLD Bcc 
DEC R3 :DEC C 
BNE 7§ ;BR IF Nor DONE YET 

JSR RS, MESLD ad SIL 
MESDAT ‘hE Ssace ADDRESS 





(OUND 000000 


ee 
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TEST 


“paste RECEIVER 


Q002°3 


104025 


005300 
001364 


004737 


1D40i§ 
104414 


104400 


027366 
026144 


900073 
OS7674 


02672 


ooocc4 


026752 


O0S094 
177400 
C267Se 


000004 
000376 
000091 


poo 


beriie 
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[es] oe ol ar 


GO8 


S93. ; CHARACTER COUNT 
138 Pc EO OAD AN EOM 
9 
SLR RLS PLL F ait aan UNIT LOOP 
MOV 859. RO sRO= CHARACTER COUNT 
MOV gMESDAT, Re ‘LOAD MESSAGE POINTER IN Re 
JSR PC, INRDY :WAIT FOR INROY 
ROMCLK =NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
021204 :GET DATA FROM IN SILO 
MOV 4(R1) RY ;PUT CHARACTER IN “FOUND” 
MOVE = { Re) "RS :PUT “EXPECTED” IN RS 
CMP8 = RS, RY 21S RECEIVED DATA CORRECT 
BEOQ 23 -BR I 
HLT 2s DATA ERROR 
DEC RO :DECREMENT COUNTER 
BNE 1$ -BR IF NOT DONE 


;CHECK TO SEE THAT IN BCC MATCH IS SET 
;AND THAT THE BCC WAS RECEIVED CORRECTLY 


ISR PS, INRDY sHAIT FOR INRDY 

ROMCLK “NEXT WORD IS INSTRUCTI ON, ROMCLK PC=5304 
921204 -$GET FIRST HALF OF CR 

MOVE  4(R1),TEM®3 PUT IN Fenea 

BIC 8177 Abo. TEMPS CLEAR HI BYTE 

ISR INRDY ‘WAIT FOR INRDY 

ROMCL *NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
021244 

MOV HRI) RY sPUT “FOUND” IN R4 

BIC 6 RY s CLEAR UNHANTED gITS 

MOV a Re “EXPECTED™ 

CMP8 = saRS “RG 4 i IN 8CC MATCH det 

BEQ — lo 

HLT 15 ' :IN BCC MATCH ERROR 

ROMCLK sNEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
021204 :GET LAST HALF 

MOVE 4(R1),TEMP2+1  :3PUT IN TEMP 

BIC #377, TEMP2 CLEAR LO BYTE 

81S TEMPS, TEMPS -16 BIT BCC NOW IN TEMPS 

CMP CALBCE,TEMP3 :IS IT CORRECT? 

BEQ a :BR IF OK . 

HLT 27 7 : oa 

SCOPE -SCOPE THIS TEST 


; SUBROUTINES 


;THIS SUBROUTINE READS LU 17, AND PUTS IT INTO NITCH. 
SNITCH IS ROTATED LEFT UNTILL THE SI BIT IS IN CARRY 


ROMCLK sNEXT ers s INSTRUCTION, ROMCLK PC=5304 
021364 ;PORT 
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Pil 


026116 


O26142 


o26144 


026144 


626160 


O26 ib2 


026162 


026274 


026276 


cese7é 


026306 


690000 


104414 


013827 


000207 


005037 


104414 
Gel2e4 
032777 
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~ SUBROUTINES 


NITCH: 


OCOR: 


SYNC: 


1$: 


OUTRDY: 
THIS SUBROUTINE SPINS ON OUT READY 


1$: 












HO8 








JOMPO4,NITCH ; STORE LU 17 
NITCH 


NITCH 
NITCH :PUT SI IN THE CARRY BIT 


; THIS SUBROUTINE SPINS ON OCOR 





; NEXT “Ll 17, IS INSTRUCTION, ROMCLK PC=S304 


:PORTY 
#8174, JOMPO4 15 OCOR set? 
OCOR F NO 
PC OK OCOR IS SET, GO BACK 





; THIS SUBSROUNTINE on THE SILO WITH THE NUMBER OF SYNC 
CHARACTERS PASSED TO IT IN hs WORD AFTER THE JSR CALL 
J ERIND A“NON-SYNC CHARACTER (301) 








3(SP)+,TEMPL § ;GET COUN 

te. -(SP) : ADJUST a ACK 

#26, 4(R1) =LOAD PORTY 
*NEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
:LOAD SYNC REGISTER 

PC, QUIRDY :WAIT FOR OUTRDY 

#1°4(R1) LOAD PORT 
ee IS INSTRUCTION, ROMCLK PC=5304 

#26, 4(R1) :LOAD PORTY 
=NEXT WORD 15 INSTRUCTION, ROMCLK PC=5304 
LOAD OUT DAT 

TEMP! :ALL DONE? 

1$ :BR IF NOT 

PC OUTRDY : WAIT FOR QUTROY 

4CRI1) =LOAD PORT 


shexT HRD IS INSTRUCTION, ROM LK PC=5304 


$301,4(R1) :LOAD PORT 4 
:NEXT WORD eT, ROMCLK PC=S304 
sLOAD OUT DAT 

eee :WAIT FOR BCR 


TEMPS ' ;CLEAR TIMER 
pum ~iti Peg INSTRUCTION, ROMCLK PC=S304 
;IS OUT ROY SET? 


#BIT4, JOMPO4 
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026314 


026330 


peoae 


026440 


026442 


Oe6E04 


026506 


cefS06 


CeeS14 


001004 


00207 


013637 


090207 


012737 
005737 
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001256 


001250 


00SSe6 


02$276 
009001 


co0026 
001245 
026276 
601250 


026144 


001250 


026276 


026144 


909073 
026746 





sGR if YES 
M 


TIMER 
KEEP CHECKING IF N 


OT DONE 
ERROR, OUT READY NOT SET 


D0 
SE 


; THIS SUBROUTINE LOADS THE SILO WITH 3 SYNCS 
SAND THE CHARACTER PASSED TO IT. 


;GET CHARACTER 
;ADJUST STACK 
Se! rat 3 SYNCS 


RENT ORD IS INSTRUCTION, ROMCLK PC=S304 
LOAD SYNC REGISTER 
sWAIT FOR OUTRDY 

D PORTY 
SNEXT WORD IS INSTRUCTION, ROMCLK PC=S304 
oe 
:NEXT LORD. AS INSTRUCTION, ROMCLK PC=S304 
igre 


;BR_ IF _NOT 
;WAIT FOR OUTROY 


a 


NEXT — i INSTRUCTION, ROMCLK PC=5304 
LOAD OUT DAT 
:WAIT FOR COR 


" ;THIS SUBROUTINE LOADS THE SILO WITH THE CHARACTER PASSED TO IT. 


;GET Ay 
ADJUST STA 
WAIT FOR euTROY 
; LOAD PORTY 
; NEXT. te + INSTRUCTION, ROMCLK PC=S304 
LOAD OUT DAT 
‘halt FOR OUT ROY 
;NEXT WORD IS ET RUCT IGM, ROMCLK PC=S304 
LOAD GARBAGE C 
:WAIT FOR SCOR 


y THIS SUBROUTINE FILLS THE OUT SILO 
; WITH A BINARY COUNT PATTERN 


;LOAD_COUNT 


FIRST TIME HERE? 













DZOME a Evi732) 22-SEP-7S 13:18 PAGE 101 
ZOMEA.P SUBROUTINES 










Sat: 0103 ae ow! pt ‘Bg iF  eidathd 
é 
254 Beaeas 000002 001250 es Rb a2, TENP2 “ADD 2 TO a COUNT 
O2e6S32 Qle737 900003 O0le4% 12900 . MOV #3, TEMP :SET FOR 3 SYNCS 
O2S540 Ole761 000026 000004 13000 MOV #26, 4(R1) :LOAD PORTY 
SeSS4 104414 ROMCLK NEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
Q26550 122114 13200 122114 Lee SYNC REGISTER 
OcbS 004737 O26e76 13300 18: JSR PC, OUTRDY nai FOR OUTRDY 
. 026556 012761 900001 o00004 13400 MOV #1,4(R1) C PORTY 
026564 104414 ROMCLK NENT WORD IS INSTRUCTION, ROMCLK PC=S304 








026565 leelll 13600 leelll :SET SOM 







026570 Jle?bl1 000026 o00004 13700 MOV #26,4(R1) ;LOAD PORT 

O26575 104414 ROMCLK :NEXT HRD. + INSTRUCTION, ROMCLK PC=5304 
026609 ie22110 13900 leelld — LOAD OUT DAT 

O26602 9005337 O0i246 14000 DEC TEMP 1 SALL DONE? 

026506 90131 14100 BNE 1$ 








;BR_IF_NOT 
:WAIT FOR OUTRDY 



















626610 004737 926275 14200 «2: JSR PC, OUTRDY 
026614 613761 O28746 ooo004 14300 MOV SCHAR, 4(R1) -LOAD PORTY 

O26622 104414 ROMCLK ‘NEXT HORD 1S INSTRUCTION, ROMCLK PC=S304 
O26624 122110 14500 122110 LOAD CUT DAT as 
O26626 005737 026750 14606 TST STUTLG tSrTSTURF??? 

O2663= 001407 14700 BEQ ES F NO 

O26634 013737 O26746 O26646 14800 MOY SCHAR S$ TT IS SDLD SO CHECK BITSTUFFING 

O26642 004527 927474 14390 ISR S STFFCL ?ADD ANY BIT STUFF CLOCK TICKS 

O2s646 o00000 1sc0o)6=s« S$: 6 5 CHA RACTER 

526650 000019 15100 10 :CHIFT COUNT 

026652 005237 o26746 15200 = &$: INC SCHAR sNEXT CHARACTER 

026656 922737 OOO400 oze74s 15300 CMP #400, SCHAR *ALL DONE? 

O26664 001403 15400 BEQ 3 

O26666 005337 001250 15500 DEC TEMP2 :DECREMENT COUNT 

026672 01346 15600 BNE 2 ‘BR IF NOT DONE 

926674 004737 o26144 15700 38: JSR PC, OCOR :WAIT FOR OCOR 

026700 900297 15809 T PC 










Oe670e 005037 026746 1S900 64S: CLR SCHAR : START nes AT ZERO 

026706 012737 177777 026750 16000 MOV #-1,STUFLG :SE T BITSTUF ye 

026714 005037 027672 16100 CLR BITCON ;CLEAR STUFF * COUN 

026720 O62737 000002 C012e50 16200 ADD #2, TEMPe ADD 2 TO CHARACTER COUNT 

Oe67e6 Ole761 000001 000004 16300 MOV BI 4(R1) :SET BITO_IN PORT 

026734 104414 ROMCLK ;NEXT_WORD Is” INSTRUCTION, ROMCLk PC=S304 
026736 le2eill 16500 l22111 ;SET_ SOM! 












26740 104414 ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
26742 122110 18790 122110 ;LOAD GARBAGE CHAR 
26744 000721 16800 BR 2g :G0 LOAD SILO 
026746 009900 16900 SCHAR: 0 
5077 926750 00000 17000 STUFLG: 0 
5078 17100 
5079 17200 
Eds 026752 17300 INRDY: 
| 5081 17400 ;THIS SUBROUTINE SPINS ON INRDY 
5082 , 17500 
5083 O26752 005037 001246 17600 CLR TEMP 
c0s4 026756 17700 18: 
E02s 026756 104414 ROMCLK ;NEXT WORD_IS INSTRUCTION, ROMCLK PC=5304 
086 26760 Oe1244 17900 021244 :PORTY+LUL2 
E087 26762 O3e777 o00c20 1Se422 19000 BIT  w8BIT4,aDMPOH =: 15 INROY SET? 
| §08e 026770 C0104 18100 BNE 2g :GR IF YES 
| 
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oca2d7 


102010 


013637 


104414 


001246 


001246 
02711e 


027112 
001250 


027110 


nai 246 
027112 


001259 


000026 


026276 
000001 


000026 


027112 


001246 
000004 


o00C04 


o00004 
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SIMBCC: 
; THIS SUBROUTINE 
IN XPOLY. THE CO 
:STATE OF THE LSB 


1S: MOY cacect RO 
CLC 
ROR CALBCC 
ROR TEMP2 
ADC RO 
ROR RO 
Bcc 2$ 
MOY XPOLY RO. 
BIC caLsct,R 
BIC XPOLY serecc 
BIS RO. CALBCC 

23: DEC TEMP! 
BNE 1$ 
MOV CALBCC,RO 
ROR 
MOV (SP)+,RO 
RTS RS 

XPOLY: OQ 

CALBCC: 0 

LRC8=200 
ERC igct 20001 


CRC.CCITT=102010 


BCCLD: 





s INC DELAY 
TRY AGAIN 
*FRROR,NO INRD'’ 
: RETURN 






JLATES THE CRC USING G Oe ten 


CRC IS RETURNED IN CALBCC 


HE BCC IS RETURNED IN THE & BIT. 


soONE RO ON STACK 
;TEMP1 = SHIFT COUNT 


‘BUT OLD 8CC IN RO 


;SHIFT OLD BCC 

SHIFT CHARACTER 

ADD CHAR CARRY TO O48 BCC 

:PUT BITO TO CARRY BIT 

CARRY IS FEEDSACK BIT 

IF FEEDBACK = 1 

sEXCLUSIVLY OR XPOLY TO CALBCC 


;DEC SHIFT COUNT 
:BR_IF_NOT_DONE 

PUT RESULT IN RO 
:SHIFT BITO TO CARRY 
:RESTORE RO 

; RETURN 


5 Tes SUBROUTINE LOADS THE OUT SILO WITH 2 SYNCS 
;WITH SOM SET, AND ONE CHARHCTER PASSED 10 IT 
WITH THE SOM’BIT CLEAR (ENABLE CRC) 


MOV a(SP)+, TEMP2 
ADD #2,-(SP) 

MOV to’ TEMP] 

MOV B26, 4(R1) 


1$: JSR PC, OUTRDY 
MOV #i;4(RL) 


M #26,4(R1) 
ROMCLK 





3GET CHARACTER 


3 NEXT WORD IS PNSTRUCTION, ROMCLK PC=S304 
;LOAD SYNC REGISTER 
;WAIT FOR OUTRDY 


; PORTY 
NEXT _ IS INSTRUCTION, ROMCLK PC=5304 


ig 
:;LOAD PORTY 
:NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 
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S145 
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027256 
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SUBROU 
122110 


0 
000207 


104414 
021364 
106177 
009207 


104414 


000207 


012737 
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TINES 


001246 
026276 
001250 


026144 


152154 


152142 
152136 


000002 
000026 


026276 
000001 


o000e6 


001246 


000004 


CO1246 
000004 


ocooo4 
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GETQO: 


GETQI: 


SYNLD: 


1$: 


SOM: 


LOS 


122110 :LOAD OUT DATA 
EC Ter ‘ALL DONE? 

NE 1 :BR IF NOT 

ISR PC OUTRDY : WAIT FOR QUTROY 

MOV TEMP2,4(R1) ; LOAD PORT 

ROMCLK : NEXT NORD * IS INSTRUCTION, 
122110 “LOAD OUT DATA 

ISR PC,OCOR ‘WAIT FOR OCOR 

RTS PC 


;THIS SUBROUTINE READS THE STATE OF THE TRANSMIT 
:BCC LSB AND PUTS IT IN THE CARRY BIT 


ROMCLK ; NEXT regted a INSTRUCTION, 


021364 :PORTY 
ROLB aDMPC4 sPUT QO IN CARRY 
RTS PC : RETURN 


;THIS SUBROUTINE READS THE STATE OF THE RECEIVE 
:BCC LSB AND PUTS IT IN THE CARRY BIT 


ROMCLK ;NEXT het inae INSTRUCTION, 


021364 :PORT4 
ROLB DMPO :PUT 90 IN CARRY 
we ADMPO4 :PUT QI IN CARRY 


PC : RETURN 


;THIS SUBROUTINE LOADS OUT SILO WITH 
32 SYNC CHARACTERS WITH SOM SET 


MOV #2, TEMP! sLOAD COUNTER FOR 2 SYNCS 
MOV #26, 4(R1) : PORTY+26 

ROMCLK : NEXT WORD IS INSTRUCTION, 
122114 =LOAD SYNC 

JSR PC, OUTRDY ‘WAIT FOR UTROY 

MOV 81;4(R1) :LOAD PORTY 

ROMCLK :NEXT WORD IS INSTRUCTION, 
122111 ;SET it 

MOV #26,4(R1) :PORT#26 

ROMCLK ;NEXT WORD 1S INSTRUCTION, 
122119 :LOAD OUT 08 waite SYNC 
DEC: TEMP 1 :£ “CREMENT C 

BNE 1$ :BR IF NOT 

RTS pc : RETURN 


; THIS SUBROUTINE LOADS SOM AND OUT DATA WITH a 
;GARBAGE CHARACTER (0) 





ROMCLK PC=S304 


ROMCLK PC=S304 


ROMCLK PC=5304 


ROMCLK PC=S304 


ROMCLK PC=S304 


ROMCLK PC=S304 
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ooce6> 


004737 
012761 


000207 


010046 


000205 


012761 


385307 
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026276 
000001 900004 


ocsoo4 


4 


0eS276 
00000e odcco4 


O01e46 
026276 
000904 


001246 
026144 


o00200 900004 


24700 
24800 


29500 


EOM: 


MESLD: 


1$: 


CLRIO: 


STFFCL: 


MOS 


JSR PC, OUTRDY ;WAIT FOR OUTRDY 


MOVs 1, 4(R1) ; . 
ROMCLK ;NEXT WORD IS INSTRUCTION, ROMCLK PC=5204 
ecR4CRI) ‘CLEAR DATA CHA 

ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=S204 
122110 LOAD GARBAGE CHARACTER 

RTS —s PC : RETURN 


; THIS SUBROUTINE LOADS EOM AND OUT DATA WITH A 
;GARBAGE CHARACTER (2) TO ENABLE TRANSMISSION OF BCC 


JSR PC, OUTRDY sWEIT FOR OUTRDY 
:POPTHe2 


MOV #2,4(R1) 

arte sNEST i IS INSTRUCTION, ROMCLK PC=S304 
i 

ROMCLK :NEXT WORD IS INSTRUCTION, ROMCLK PC=5304 

peeit0 pc i Dee GARBAGE CHARACTER 


;THIS SUBROUTINE LOADS SILO WITH “ 
:THE FIRST ARUGUMENT IS THE ADDRESS OF THE MESSAGE 
THE SECOND ARGUMENT IS THE NUMBER OF CHARSCTERS IN THE MESSAGE 


MOV RO,-(SP) ;SAYE RO 
MOY (RS)+,RO :RO=MESSAGE POINTER 

MOV (RS)+° TEMP] : TEMPI=CHARACTER COUNT 

JSR PC. OUTRDY :WAIT FOR OUT 

MOVE = (RO) +, 4(R1) sLOAD PORTY WITH CHARACTE 

ROMCLK :NEXT WORD IS INSTRUCTION. ROMCLK PC=5304 
122110 :LOAD OUT DATA SILO 

DEC TEMP :DEC CHAR COUNT 

BNE 1$ :BR IF NOT DONE 

ISR PC, OCOR “WAIT FOR OCOR 

MOV (SP)+, RO RESTORE RO 

RTS : RETURN 


; THIS SUBROUTINE SETS IN CLR AND OUT CLR TO 
;CLEAR THE TRANSMIT AND RECEIVE BCC REGISTERS 


MOV #BIT7,4(R1) LOAD P 

eT i" HOD = INSTRUCTION, ROMCLK PC=S304 
ROMCLK {NEXT Hor 15 INSTRUCTION, ROMCLK PC=5304 
le2lli :SET OUT CLR 

RTS PC ; RETURN 


;THIS SUBROUTINE ADDS ANY NECESSSARY BIT STUFF CLOCK TICKS 








OME MACY11 
ZOMEA.P11 


5274 o27e62 


S277 027554 


Sefe 927554 


$200 O2764e 
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SUBROUTINES 


001252 


027672 


027672 
0000s 027672 
027672 
000001 
001252 


001252 


027672 


027672 
00000S 027672 


027672 
000001 
026112 


001252 


00003¢ 
1S132e6 151324 


1$: 


es: 


33: 


STFFCK: 


1$: 


es: 


3$: 


CTSDLY: 


1$: 





N08. 


:FIRST ARGUMENT IS CHAR, SECOND ARGUMENT IS SHIFT COUNT. 


MOV RO. hy, ; DAVE RO. 
MOV RO :PUT CHAR_IN RO 
MOV Be}, TEMP3 j PUT SHIFT COUNT IN TEMP3 
RORB RO $1, 00K AT ay er BIT 
UL 
aR Bi TCON TT lias a "SPACE, CLEAR 1°S COUNTER 
r 3$ : CON TINU 
NC BITCON :INC CONSECUTIVE 1°S COUNTER 
CMP #5,BITCON 31S IT S YET? 
BNE i NO 
CLR BITCON ;YES! SO START AGAIN 
DATACLK, i, : GIVE oie TICK TO STUFF ZERO 
DEC TEMP3 :DEC SHIFT COUNT 
BNE 1$ :BR IF NOT DONE 
MOV (SP)+,R0 :RESTORE RO 
RTS RS ; RETURN 


; THIS SUBROUTINE CHECKS TO SEE IF TRANSMITTER 
1S STUFFING ZEROS WHEN IT SHOULD. FIRST ARGUMENT 
1S THE CHARACTER, SECOND ARGUMENT IS SHIFT COUNT. 


MOV RO,-(SP) ;SAVE RO 
MOV (R5)+.R0 :PUT CHAR IN RO 
MOV (RS)+; TEMPS PUT SHIFT COUNT IN TEMP 
RORB RO :SHIFT OUT NEXT BIT 
BCS 25 -BR IF IT IS A MARK 
CLR BITCON in Has A SPACE, CLEAR 1°S COUNTER 
INC BITCON SINC CONSECUTIVE 1’S COUNTER 
CMP #5, BITCON i5 IN A ROW YET? 
BNE 33 R IF NO 
CLR BITCON "YES, SO START OVER 
DATACLK, 1 EXTRA TICK TO STUFF ZERO 
ISR PC, GETSI ;LOOK WIN NOM 
BCC 3$ IT a ZERO, BR IF YES 
HLT 30 NO ERROR sEho HAs NOT STUFFED 
DEC TEMP3 :DEG SHI 
BNE 1$ :8R IF tot BONE 
MOV (SP)+, RO “RESTORE RO 
RTS RE ;RETURN 


;THIS SUBROUTINE WASTES TIME UNTIL CTS SETS 
BUT HOPEFULLY NOT 50 LONG THAT THE SILO RUNS OUT 


MOV RO, -(SP) ;SAVE RO 

MOV #32, RO ‘LOAD RO WITH COUNT 

CMP JTKCSR, ITKCSR si STE TIME 

DEC RO sDECRENENT COUNTER 

BNE 1$ :00 IT AGAIN IF NOT = 0 


(SP)+,R0 ;RESTORE RO 
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a} 
0 
0 
0 
i 
0 
g 
9 
0 
0 
0 
0 
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0 
A 
5 
iy 
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TULUM IO &— 0 0- + &-- 0 &- 8+ 9 
YQONOdVOWOVDOINMWMO00 


PSRROSSS “ITU £UITUL-O 


ee 
Ooo0t 


oo 


MOOOOO000D 


‘377 
(377 


DDD OY 


UIT NUN I LN LN NUN NINUiNN 


(377 > / 


DPYOYPYPYPYP YHOO YMYY 


(377 


CHOP OOIOIO OOOO. OODOdOONOOONOAOOHO 
O-40-40-40-40-10-40-40-4 0-40-4404 0-0-4 -40 4-4-4040 0-4 0-0-0 0-4-0 0-4 0-00 —08—0 
IININININIINIININD ISIININININIIDN INR UES UID ININININININIIN 


DOYPYPDIYDYPYD YPYHYYLY YD 
WUIUIUNUNININWD = LUN LNiNinin 


B09 


f8.O111.410 
0, 128,282,377 
1,2,4,10,20,4C, 100 


100, 140, 160 


363, 347,317,200,0,3 


(27 ‘ 77>/LINE U 
>*L INE 
P>tL INE 
PAT NE UN 


305) ENpesten 
(377>/ ae! 


‘ 377) 


(377 


3,7 





;FLAG CHARACTER 


.200, 376,378,373, 367,35 


nin 


NET RES TETER WRITE READ Sects 
IT INTERNAL CLOCK FAILURE - 
(377) / ret n Ye QATA ERROR / 
/RECEIVER TEST/ 
(377> /RECEIVER DATA sag 
77)/MODEM SIGNAL ERR 
7 /TRANSMIT TER Cee SR oR, 
aay. the GRC ta / 


N BCC MATCH ERS 
(370) / TranSAITTER FAILE 
77> /CABLE DATA TEST . 
77) FLAG ERRO : 
C35) Trash TER pail ED TQ STUFF A ZERO 
(377> /SWi TCH aor TEST 
ae aaORt BF ERR 
(377) / TRANSMITTER ERROR 
7?)>/HALF OUPLEX TEST/ 
(377) /QUT READY NOT Sag 
(377>/IN RERDY NOT SET/ 


>/EXPECTED FOUND/ 
(377) / ok iee FOUND LU-REG) 


»/RTS D 


_ 


— 

a 4 
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0$300 SAVR3 
09400 OTl2: eo 
385s BYTE 

03800 TEMP3 

03300 

10000 # .ERRTAS: 
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CREAM 001320 7938 «1078* + 1859e 1860 1962% 1866 
&SR e434 i? 65 






a) 

e lt 
DATACL= 104415 Ss Ebi 2686 690 2750 2751 g? 280 2802 2816 eese g 
3 2904 2918 969 2%63 3004 303 206 3088 3117 3165 3 
3 33} 3316 33593 33§0 3397 2544 3545 3573 3574 3619 2 
3694 3695 3723 3724 3769 3779 3758 3799 3853 3855 3 
3997 4018 4036 4043 4O4S 4078 4148 4162 4183 4213 42 
4501 4519 4526 4 
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DMACTY 691306 o87 5 1e4s* 1250 





1864 1946% 2129% 2135% 2136% 2140 216S 











cS 001404 S18 1158® 1184 1221 1338 1375 1688 1734 1868% 1877 1926 2230% 

OMCSRH 001406 Bee 1715 1716* i7eQe 1726e 727% 1733% 1795* 18778 1878% 187 

DMCTL 901410 8638 1879% 1880 1881 
| DMNUM = 091310 7888 1074 1324 1944 1959% e2lel* 222 2130 2132 en. 
| OMPOY  O0141e goes ie 1710 1747 17S2 188l* 188e# 1883 4921 4934 497 $087 5lé2# 
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4067 4128 

1106 

17588 1900 
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1372 1664 

2eS99*  eb32% 
3158%  3195% 
3831*  3897% 
4YSeek 492e3# 
1758% 1852 

119C# 

19S2 

2685 2747 

4663 4723 

i166 1188 

5335 

2743 2789 

4137 4384 

$139 5148 

1901 1953 

1470 

1458 1460 

1307% 1308 

1107*% 1ilels 
2eClee  e20ebs 
e798* e2805* 
2946*  2950% 
3200% 3237% 
3537% 3542 
646%  3656# 
3777% 3781% 
3931%  3975% 
4O76*  4077% 
4190% 42lb% 
4383% 4384% 
4487% 4SO4* 
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4375 


e2e8% 
e 


4649 


4751 


4845 
















R3 


RY 


RS 


DZOME 
DZOMEA.P11 





%090092 


" 
oO 
oO 
Oo 
oO 
oO 
Ww 


*-000004 


=%000005 


MACY11 27 


22-SEP-76 13:18 PAGE 119 
CROSS REFERENCE TABLE -- USER SYMBOLS 


1874 7 
2036* 2039% 
2119 2157% 


iS4S*  1546% 
18ile 1815 
2013 2015 
2814 28S0* 
3331%  3353% 
4008% 4009 
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270S* e7l4e 2716 es44e 2951 
3035*  3036* 3063% 3064% 3066 
3134% S140% 3141* 3143 3169% 
3215* Se43% 3e44e 3246 seS2% 
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1477 1479 1485 486% 14908 1505 1520% 1531 1S4e# 1554# 1569# 16114 16124 
1613 1615 2187 2188 e2189% 21908 2191% e2192# 2193 ee3t# 5527 geS9* ge60 
eceS3# eS esur7e e3l1# e3le Fick a) 0 ac -10) ee e3/S# 2382 es9e# 86335 
eseye =6eteS® =—eteB eC eHHGe = =OeuHER OHH (eB | 6HB = 99H = S01 eSe7# 228 eS4Se 
eS50 ebl4# 2615 ec648e c649 c658# c659 c696% c697 e0b# 2707 27158 e716 
ev4ee a 44 e749 99% = 89S 0 2844s aore 28S! ge9s* 6897 2@3e es4ss 
e%e  e296e* 2983 3009* 3010 3037# 3038 3065 3066 033% 3094 gi23# 3124 
3138# 3136 3142+ 143 3.7 3172 3179# 3180 3eC8# 3299 3216# 3217 2245# 
3246 ges3#  yeS4 se8e# 3283 3290+ 323] g3el# Jee 3365* 3366 s40e# 3403 
g410% 41] 3419% 4 S451# 454" 3455 S466# 469% 3470 3900# J9530#  J512# 
2514 osu7e 3576 g6ee# 3651# 36978 s7eb+ s77ee 3801* 3837# 3854 J8S6#  J98e# 
3883 3903# 3920 3S9ee# 3948% 3949 3977# 9e4# 3985 399! 3992 473% 4083s 
4084 4102% 4103 4ige¢ Yi4en 4149" ° 4150 4156 4157s “ele  Yede 4207 8=6420S# 
4279% 4289 Hesse | ONG “Jeet 4323 W342% 4343 438S# 4390# 4397% 4398 4404 
440S* 4449= 4450 44ESe 4469 447 447S5* 4S46# ¢ 4565% 4567 45068 S87 
400%  446Ci 4EeCe 4el 4ESS*# 4660R 4675+ $76 468S*# 4686 4693" 4694 4720# 
472e9% = §=64° 30 W7hee 847658 8647738 «=04777% =—-47508 791 4812 4813 4956# 4863# 48750 
49°65 4895* 489° S0S6* $101 §102 5103 Sl20# S230 S231 Se40#  S2bU 5261 
P S274e 5283 Se8+ 5300% 
SAVACT 001312 7898 4 le44 = 21 40# 
SAVYNUM 001314 7908 «61074 )«=«61g2]# l3e4# 2133 
SAVPL 86 OD E76 7838 8=6119% § lel 1501# 1670 
SAVRO 3 001260 veoe «615108 861815 §335 z 
| SAVR1 4 ODOlebe 77ers) = letet = 3219 1509# 1516 
| SAVRE 901964 779s =61808% 861517 $335 
SAVRS 001255 773s = 1507# §=61518 $335 
SAVERY 001270 7808 1506% 1535 $338 
SAYRS Ulle7e 7818 1505# 1520 $338 
SAVSP 001274 7828 
| SAVOS = LO4406 8258 1610 
SCHAR 026746 3209 3350% 5032 5059 5055 5059# 5060 S0g6* 50768 
SVJPE = 104400 Sl38 2240 2263 ee8? 315 err )0l aC? BS 2553 2596 2619 
2663 e720 2771 e822 2873 e3e4 =e 985 3013 3041 3063 2097 03146 3133 
secu 3 Seo 3234 3333 3377 S422 3473 3519 3594 3683 a7 44 3819 3895 
338) 4052 4109 4355 4633 4658 4733 4828 4909 
| SCOP] = 10440: 8158 2343 2356 2385 2399 2431 e4Se 2486 2504 3564 3593 3839 3668 
3714 cre 3°33 3318 
| SILOLD OZE50e 3314 3339 3358 3374 50278 
SIMBCC 027004 3547 3576 s6e2 3651 3697 3726 3772 3801 38Sé 3922 3992 4157 4208 
S405 3475 4762 4855 50958 
| SOFTSW gO7r20 1733 s:« 18388 
| SOM Je? 335 4389 $1978 
SP = Q000DE 655s 107e# 1089% 1090# 1097 1100 110} 1153% 1154# 1212 1237 1238 12634 
leb4# le65# 1274 1275 1277 1383# 1373 1989# 1394# 1395 1396% 1408 1412% 
14i3e 861414 L4:S# 143) 1432 1434# = 1495# = 1437 1438 1444e  1845% =| 1446 1452 
1489 + 1490° 150) ISe7e# iSee# 15e9# 15308 I1F918 1532 1533# 1569 1570 1§?1 
| 1572 1573 1586# iS87# 1988% i589 1590% 15918 iSSe# 1593 1606 1608 1$1) 
1656 «= 1b6be# 1687# = 172] 178ee «1731 1732* 72 Pade 1PSie 17See 1783818 IPe 
lee Lies ise eivee  ¢i55 eid elgse 869549 $995" 3556 “S532 5915 SUi5* 
S100# 5119 S133 Sil34# See9# 5239 SeS9# S273 Sese# $299 $307% $312 
| SPRCNT= OO4621 1536# 1560 1S63# 15778 
| STACK s 001200 bes 1072 le63 1665 1687 
| STAT W0i240 768s , ." p 
, BI6T2 | ost 8508 1871% 2308 3438 3440 3452 3467 3438 3470 3812 4752 4845 
| STATe 001370 8518 18728 227 2549 
STATS  O01372 S28 1873+ 
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2141 2iS38 
13g2 21438 
1S34# 8 =61567# «615758 
1538 16418 
fay 1692 18048 
13il 13368 
1317 13458 
1130 1rsse 
1315 13428 
3o39* J3568% 3614  3643% 3689% 3718* J764* 3793% 3839 3905s 
- S403" S47se 4757% 485le Sill §113 Si2is 
XSTATG O97274 11393 17SSe 
XTSTN QOS232 1§32 18718 
XVEC COS4é4 1313 13398 
ZERO 001300 7TS4e $335 
SlOD = FeReee LU 533 
SOSae = 17TTTT le 22178 2220 22238 22418 2244 22478 22648 2267 22703 22348 
23168 2319 esees 23588 2361 est4e 24008 2493 24068 e24Sés 25lcs 
eSi3 eSl6s 9 eS3e8 2535 eS38# eSS48 2557 eS60s 25878 2590 2622 
2b278 c6648 2667 eb7le 27218 2724 e7e9e 9827728) = e775 2780s 28318 
28748 e877 288e#8" e3eSs 29c8 23348 29868 2989 23928 8630148 30428 
2045 30488 30708 3073 30768 30988 3101 31058 31478 3150 3 3187 
31908 Se2le 3224 See7e 322588 1 seb4s 32958 32018 3334 23428 
33788 3381 33868 34e38 3426 34308 3474s 3477 34808 35208 3 3 35958 
3598 36028 26708 3673 267748 37458 3748 37S2e 38208 3823 s826e 3896s 28989 
38928 329528 3955 29608 40538 40608 41108 4113 Slele 443568 4359 4369s 
EAS 10; 46348 4637 46428 46998 4702 47058 47348 #4737 47448 48292 32 48338 
SENDAD 9003432 7 1104 13288 1651 
SN = 000057 e 2217 2223 222s 22308 224 2247 2243 22548 2264 227 2272 2277 
22788 2288 2234 2236 230! 22028 2316 sare 2324 2330 233le 2352 2364 
22bé& 2372 22738 862400 2496 2408 2414 241Se 2458 2454 eens 247? 24733 
e eslé 2518 2523 eSe4e e532 e538 2549 2545 es4éa 2554 2560 2S62 
2567 eS68s 2587 2534 2596 2601 egdes 2620 2627 2623 2634 26358 2654 
2671 2$73 2678 28798 2721 27293 2731 2736 e7a7e 862772 2780 2732 27S7 
j 27888 2823 e821 2833 2838 28398 2974 29g2 2384 2939 23908 2925 23 
| 2936 241 estes 2986 239e 2394 2399 20008 3014 3020 3022 30e?7 3028s 
3042 3048 3050 3055 30568 3070 3076 307 3033 so84% 3093 3105 3107 
| sil2 1138 9314? 2153 31S5 2160 Sigsle 3184 3190 3132 3197 31988 3221 
3227 3223 2234 32358 3258 3264 32665 3271 32728 3235 3301 3303 3398 
| 33038 2334 3342 3344 3349 33508 3378 2385 3388 33933 323548 3423 3730 
| 3432 3437 34388 3474 3480 3482 3487 S4gse 3520 3527 35293 3535 3S3$s 
2s3s 2602 604 3610 Sblle 3670 3677 3679 3$ss S6868 3745 3752 375 
3760 37618 3820 3826 3833 38348 3956 3892 3834 3839 33008 3952 
j 3960 2 3967 33688 4053 4060 O62 4067 4O058% 4110 e121 4123 4123 
4l298 4356 4368 ~ 4375 43768 4634 4642 4544 wo45 45508 4699 4705 
} ma 4712 47138 4734 4744 4746 4751 47S28 4929 4838 4840 4345 43462 
i 8 
| $s s 00006! le 2228 22308 2252 2254s 2275 22788 2299 23028 2327 233i8 2369 23738 
| 2411 e41S5e 246 24738 1 eSe4e 8 254 essa 25 2sé8s 2539 e028 e632 
ctase e676 26798 734 era7e = =627gs esse 2836 28238 , 28308 2933 2s: 
2397 30008 3025 30288 3953 20568 3081 0848 3110 3li3gs 343 Sigie 3195 
21588 2232 22358 3269 sere8 3306 33098 3M 33508 333 se 63435 34338 
34285 34888 3532 35368 3 36118 3682 36868 232757 37618 3831 39348 3997 
33008 3965 33688 4065 40688 4126 41298 437 43768 S $6508 4719 37138 
| 4745 47528 4843 48468 
| § s 900017 le 805% 813 615s S233 
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8258 8378 8398 S4is 8438 

7Ob8 “Uc 7108 7178 vecs 7eS8 7298 733% 7258 878 
S7le g°3s ov4s S7Ss S768 8788 87938 830% 881s BE28 
38s 83s 8908 831s 8938 sos goss 8968 e988 2398 
Sous 3058 9088 9088 3038 9108 Silas S138 3148 9158 
9208 Seis 9238 3248 3258 9268 3288 9298 $308 S3ls 
S268 5388 929% 3408 34138 3438 S448 3458 S4é% 3488 ; 
1110 1120 lesle 1248 1681 1631 17398 8617748) «617768 = 17788 = 1830 1 
1348 19S2 2035 20399 2145 2176 2208 221 2303 3439 3453 3468 
3$le 4047 4263 4530 
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§3C i5e$8 
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13048 4843 

1618 53358 
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822 14338 
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828 15158 
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0 NCE TABLE -- PERMANENT SYMBOLS 
. 8065 4086 4101 4121 4126 4127 4299 43941 4368 4373 437 4565 4619 4642 4647 
S648 $7Os 4719 4711 4794 4749 4750 4811 48338 4943 4844 42895 $163 $173 
Ine os > Ob-* Bie. > BS = Ber Oe ee.) ee a 23 8350837838 
83 3$9 221, e225 2228 ec4) 2e49 eeSe 2264 2e7e 2e7 2258 5678 2299 2316 
eje4 e327 2398 2366 2369 2400 2408 e411 2458 2466 2469 2510 251 esel e532 
eS40 2543 es$4 eSte 2565 2587 2596 e599 e620 2629 2632 2654 2673 2676 e723 
eg: 3] e734 erre é’8e gage gsc3 2833 2836 2874 e884 2887 2325 2326 2339 238s 
e334 23s: 3014 3022 OeS W4e 3050 3053 307 3078 . 308) 3038 3107 21i0 3147 
3158 3258 3184 3132 3195 322) 3229 3232 3258 3266 3269 323 3303 3306 3334 
sos sot? 3378 3383 3331 3423 J432 3435 347 2482 3485 3520 3$29 3$32 333 
3604 3697 28790 38°79 3682 3745 37S4 3757 3820 3828 3831 3886 3834 3897 3392 
332 3%5 4053 4962 4965 4110 4123 4126 4356 4370 4373 4534 4644 4647 4659 
4707 4710 4734 4746 4749 4829 4849 4843 4910 
LIST ”' $33 bee g44 634 636 meen) ‘oe 734 80S 815 817 $19 82} 823 
$25 $27 $23 831 833 835 837 833 341 843 1013 1063 1298 1349 1758 
2217 2ec3 2230 224) 2247 2254 eeb4 2270 2278 2288 2234 e302 23is e322 2331 
ess 23040 2373 HOS GCI GS GH 473 S10 Sis 2H 3B HH HE 
ess4 e560 2568 2537 2534 2692 2629 ebe7 2635 2564 2671 2679 2721 2729 27 3ar 
ere agi) 2738 2823 2531 2839 2674 esse 2890 2325 2934 es42 e98é 2332 3000 
3014 2929 2028 3042 3048 3056 3970 307 3084 3098 3195 3113 3147 3153 316! 
318% 3190 3198 3221 see/ 3235 3258 3264 sere 3235 3301 3309 3334 3342 3353 
23378 3395 3334 3423 3420 3438 3474 3480 3488 3520 3$e7 3536 338 3602 3611 
3670 3677 3686 3745 3752 376) 3829 3826 3834 3886 3832 3909 33$2 390 3368 
40S 3 4OED 4OE8 4110 412] 4129 4956 4368 4376 4634 4642 4650 46599 4705 4713 
3 4734 yee. 47520 4829s BBS 484 = 49100 $335 
.MBQED } 33 
NLIST i $99 $22 S44 $34 636 707 722 73 g0S gis 817 819 821 823 
825 S27 829 831 833 835 837 839 841 843 1913 =. 1083 1299 13493 i7S8 
| 2217 2223 2230 2241 eed? 2254 2264 227 2278 e298 2294 2302 2316 eJ22 233} 
e358 2364 e373 2400 2406 2415 2458 2464 e473 2510 esl6.- eSc4 e532 2529 2546 
ess4 e560 eS68 2587 2534 2602 2620 2627 2635 e664 2671 26793 272} 2729 Fe re 
erras278D0 «788403822 283] 489-3839 874 ee? 2890 $9e5 98934 0 Bae =. 986 = G92 3000 
3034 3020 3028 3042 3045 3056 070 07S 3084 3098 3105 3iig 214 31S3 lol 
3184 3190 3138 gee] 3227 3e35 3258 3254 3272 3238 330) 3303 3334 s3t2 3359 
3378 3386 3334 3423 3430 3438 S474 3430 3488 3520 3527 3536 3335 3602 3$i! 
3670 3ér7 Sb86 3745 3r5e 376i 3820 3826 3934 3886 333¢ 3990 3%2 3369 3368 
4053 4960 4968 4110 4lel 4129 4356 4368 4376 4634 4642 4650 $659 $705 4713 
“734 4744 4752 4829 4838 4846 4910 $335 
| .PRok 644 656 742 ‘3 S45 354 1007 1063 1298 1841 
| .REM 1013 
REPT 70? 4755 
| -SSTTL P22 S44 £9& 732 1063 1238 1349 2217 e316 2587 2386 
} = ee a ee 
| 
| ERRORS DETECTED: @ 
| CEFAULT GLISALS GENERATED: 0 
| #, DZDMEAR. SEG/SOL/CRE “PAGNUM/NL: TOCSIPLUTL.MAC,OZOMEA.P11 
| RUN-TIME: Se 74 11 SECONDS 
| BLN-TIME RATIO: €54/137=4.7 
| CORE USED: 36K (63 PAGES 


